From c76509d72372a02d8eabd83064aaac30b1cbd76b Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 12 Dec 2018 13:17:02 -0300 Subject: [PATCH] Bug 21798: replace gimme_a_biblio with build_sample_biblio Signed-off-by: Marcel de Rooy Signed-off-by: Nick Clemens (cherry picked from commit 2b765487705fa90298f8e843b660df386bbc1730) Signed-off-by: Martin Renvoize --- t/db_dependent/Circulation.t | 18 ++++++++--------- t/db_dependent/Holds.t | 22 ++++++++++----------- t/db_dependent/Holds/LocalHoldsPriority.t | 2 +- t/db_dependent/Holds/RevertWaitingStatus.t | 2 +- t/db_dependent/Items.t | 18 ++++++++--------- t/db_dependent/Items/DelItem.t | 2 +- t/db_dependent/Items/GetItemsForInventory.t | 4 ++-- t/db_dependent/Koha/BiblioUtils/Iterator.t | 2 +- t/db_dependent/Koha/Biblios.t | 2 +- t/db_dependent/Labels/t_Label.t | 2 +- t/db_dependent/OAI/Sets.t | 8 ++++---- t/db_dependent/Reserves.t | 4 ++-- t/db_dependent/Serials.t | 2 +- t/lib/TestBuilder.pm | 2 +- 14 files changed, 45 insertions(+), 45 deletions(-) diff --git a/t/db_dependent/Circulation.t b/t/db_dependent/Circulation.t index 613cd74e92..80b19c42fb 100755 --- a/t/db_dependent/Circulation.t +++ b/t/db_dependent/Circulation.t @@ -229,7 +229,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); # CanBookBeRenewed tests C4::Context->set_preference('ItemsDeniedRenewal',''); # Generate test biblio - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $barcode = 'R00000342'; my $branch = $library2->{branchcode}; @@ -923,7 +923,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); my $branch = $library2->{branchcode}; #Create another record - my $biblio2 = $builder->gimme_a_biblio(); + my $biblio2 = $builder->build_sample_biblio(); #Create third item AddItem( @@ -1002,7 +1002,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); my $barcode = '1234567890'; my $branch = $library2->{branchcode}; - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); #Create third item my ( undef, undef, $itemnumber ) = AddItem( @@ -1059,7 +1059,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); undef, 0, .10, 1 ); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $barcode1 = '1234'; my ( undef, undef, $itemnumber1 ) = AddItem( @@ -1142,7 +1142,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); my $branch = $library->{branchcode}; #Create another record - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my (undef, undef, $itemnumber) = AddItem( { @@ -1172,7 +1172,7 @@ C4::Context->dbh->do("DELETE FROM accountlines"); { my $library = $builder->build({ source => 'Branch' }); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $barcode = 'just a barcode'; my ( undef, undef, $itemnumber ) = AddItem( @@ -1472,7 +1472,7 @@ subtest 'CanBookBeIssued + Statistic patrons "X"' => sub { subtest 'MultipleReserves' => sub { plan tests => 3; - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $branch = $library2->{branchcode}; @@ -2009,7 +2009,7 @@ subtest '_FixAccountForLostAndReturned' => sub { ); my $library = $builder->build_object( { class => 'Koha::Libraries' } ); - my $biblio = $builder->gimme_a_biblio({ author => 'Hall, Daria' }); + my $biblio = $builder->build_sample_biblio({ author => 'Hall, Daria' }); subtest 'Full write-off tests' => sub { @@ -2374,7 +2374,7 @@ subtest '_FixAccountForLostAndReturned' => sub { subtest '_FixOverduesOnReturn' => sub { plan tests => 10; - my $biblio = $builder->gimme_a_biblio({ author => 'Hall, Kylie' }); + my $biblio = $builder->build_sample_biblio({ author => 'Hall, Kylie' }); my $barcode = 'KD987654321'; my $branchcode = $library2->{branchcode}; diff --git a/t/db_dependent/Holds.t b/t/db_dependent/Holds.t index 8091fd5319..e2066c7a88 100755 --- a/t/db_dependent/Holds.t +++ b/t/db_dependent/Holds.t @@ -54,7 +54,7 @@ $insert_sth->execute('DUMMY'); $insert_sth->execute('ONLY1'); # Setup Test------------------------ -my $biblio = $builder->gimme_a_biblio({ itemtype => 'DUMMY' }); +my $biblio = $builder->build_sample_biblio({ itemtype => 'DUMMY' }); # Create item instance for testing. my ($item_bibnum, $item_bibitemnum, $itemnumber) @@ -239,7 +239,7 @@ is( $hold->priority, '6', "Test AlterPriority(), move to bottom" ); # Note that canreservefromotherbranches has no effect if # IndependentBranches is OFF. -my $foreign_biblio = $builder->gimme_a_biblio({ itemtype => 'DUMMY' }); +my $foreign_biblio = $builder->build_sample_biblio({ itemtype => 'DUMMY' }); my ($foreign_item_bibnum, $foreign_item_bibitemnum, $foreign_itemnumber) = AddItem({ homebranch => $branch_2, holdingbranch => $branch_2 } , $foreign_biblio->biblionumber); $dbh->do('DELETE FROM issuingrules'); @@ -284,7 +284,7 @@ ok( { # Regression test for bug 11336 # Test if ModReserve correctly recalculate the priorities - $biblio = $builder->gimme_a_biblio({ itemtype => 'DUMMY' }); + $biblio = $builder->build_sample_biblio({ itemtype => 'DUMMY' }); ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $branch_1, holdingbranch => $branch_1 } , $biblio->biblionumber); my $reserveid1 = AddReserve($branch_1, $borrowernumbers[0], $biblio->biblionumber, '', 1); ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $branch_1, holdingbranch => $branch_1 } , $biblio->biblionumber); @@ -321,7 +321,7 @@ ok( CanItemBeReserved( $borrowernumbers[0], $itemnumber)->{status} eq 'damaged', ok( !defined( ( CheckReserves($itemnumber) )[1] ), "Hold cannot be trapped for damaged item with AllowHoldsOnDamagedItems disabled" ); # Regression test for bug 9532 -$biblio = $builder->gimme_a_biblio({ itemtype => 'CANNOT' }); +$biblio = $builder->build_sample_biblio({ itemtype => 'CANNOT' }); ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $branch_1, holdingbranch => $branch_1, itype => 'CANNOT' } , $biblio->biblionumber); AddReserve( $branch_1, @@ -369,7 +369,7 @@ $dbh->do(q{ INSERT INTO branch_item_rules (branchcode, itemtype, holdallowed, returnbranch) VALUES (?, ?, ?, ?) }, {}, $branch_1, 'CAN', 1, 'homebranch'); -$biblio = $builder->gimme_a_biblio({ itemtype => 'CANNOT' }); +$biblio = $builder->build_sample_biblio({ itemtype => 'CANNOT' }); ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem( { homebranch => $branch_1, holdingbranch => $branch_1, itype => 'CANNOT' } , $biblio->biblionumber); is(CanItemBeReserved($borrowernumbers[0], $itemnumber)->{status}, 'notReservable', @@ -395,7 +395,7 @@ $dbh->do('DELETE FROM issues'); $dbh->do('DELETE FROM items'); $dbh->do('DELETE FROM biblio'); -$biblio = $builder->gimme_a_biblio({ itemtype => 'ONLY1' }); +$biblio = $builder->build_sample_biblio({ itemtype => 'ONLY1' }); ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $branch_1, holdingbranch => $branch_1 }, $biblio->biblionumber ); @@ -420,7 +420,7 @@ subtest 'Test max_holds per library/patron category' => sub { $dbh->do('DELETE FROM issuingrules'); $dbh->do('DELETE FROM circulation_rules'); - $biblio = $builder->gimme_a_biblio({ itemtype => 'TEST' }); + $biblio = $builder->build_sample_biblio({ itemtype => 'TEST' }); ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $branch_1, holdingbranch => $branch_1 }, $biblio->biblionumber ); @@ -490,7 +490,7 @@ subtest 'Test max_holds per library/patron category' => sub { subtest 'Pickup location availability tests' => sub { plan tests => 4; - $biblio = $builder->gimme_a_biblio({ itemtype => 'ONLY1' }); + $biblio = $builder->build_sample_biblio({ itemtype => 'ONLY1' }); my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $branch_1, holdingbranch => $branch_1 }, $biblio->biblionumber ); #Add a default rule to allow some holds @@ -547,21 +547,21 @@ subtest 'CanItemBeReserved / holds_per_day tests' => sub { my $patron = $builder->build_object( { class => 'Koha::Patrons' } ); # Create 3 biblios with items - my $biblio_1 = $builder->gimme_a_biblio({ itemtype => $itemtype->itemtype }); + my $biblio_1 = $builder->build_sample_biblio({ itemtype => $itemtype->itemtype }); my ( undef, undef, $itemnumber_1 ) = AddItem( { homebranch => $library->branchcode, holdingbranch => $library->branchcode }, $biblio_1->biblionumber ); - my $biblio_2 = $builder->gimme_a_biblio({ itemtype => $itemtype->itemtype }); + my $biblio_2 = $builder->build_sample_biblio({ itemtype => $itemtype->itemtype }); my ( undef, undef, $itemnumber_2 ) = AddItem( { homebranch => $library->branchcode, holdingbranch => $library->branchcode }, $biblio_2->biblionumber ); - my $biblio_3 = $builder->gimme_a_biblio({ itemtype => $itemtype->itemtype }); + my $biblio_3 = $builder->build_sample_biblio({ itemtype => $itemtype->itemtype }); my ( undef, undef, $itemnumber_3 ) = AddItem( { homebranch => $library->branchcode, holdingbranch => $library->branchcode diff --git a/t/db_dependent/Holds/LocalHoldsPriority.t b/t/db_dependent/Holds/LocalHoldsPriority.t index 5e087161b5..0ecb9d124c 100755 --- a/t/db_dependent/Holds/LocalHoldsPriority.t +++ b/t/db_dependent/Holds/LocalHoldsPriority.t @@ -40,7 +40,7 @@ my $itemtype = $builder->build( my $borrowers_count = 5; -my $biblio = $builder->gimme_a_biblio(); +my $biblio = $builder->build_sample_biblio(); my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $library4->{branchcode}, holdingbranch => $library3->{branchcode}, diff --git a/t/db_dependent/Holds/RevertWaitingStatus.t b/t/db_dependent/Holds/RevertWaitingStatus.t index 24bba184c5..30228dfcef 100755 --- a/t/db_dependent/Holds/RevertWaitingStatus.t +++ b/t/db_dependent/Holds/RevertWaitingStatus.t @@ -46,7 +46,7 @@ t::lib::Mocks::mock_userenv({ flags => 1, userid => '1', branchcode => $branchco my $borrowers_count = 3; -my $biblio = $builder->gimme_a_biblio(); +my $biblio = $builder->build_sample_biblio(); my $item_barcode = 'my_barcode'; my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $branchcode, diff --git a/t/db_dependent/Items.t b/t/db_dependent/Items.t index 264d34776f..e761db5afe 100755 --- a/t/db_dependent/Items.t +++ b/t/db_dependent/Items.t @@ -57,7 +57,7 @@ subtest 'General Add, Get and Del tests' => sub { # Create a biblio instance for testing t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); # Add an item. my ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $library->{branchcode}, holdingbranch => $library->{branchcode}, location => $location, itype => $itemtype->{itemtype} } , $biblio->biblionumber); @@ -169,7 +169,7 @@ subtest 'GetHiddenItemnumbers tests' => sub { # Create a new biblio t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); # Add two items my ( $item1_bibnum, $item1_bibitemnum, $item1_itemnumber ) = AddItem( @@ -277,7 +277,7 @@ subtest 'GetItemsInfo tests' => sub { )->store(); # Add a biblio - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); # Add an item my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { @@ -376,8 +376,8 @@ subtest 'SearchItems test' => sub { t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); my $cpl_items_before = SearchItemsByField( 'homebranch', $library1->{branchcode}); - my $biblio = $builder->gimme_a_biblio({ title => 'Silence in the library' }); - $builder->gimme_a_biblio({ title => 'Silence in the shadow' }); + my $biblio = $builder->build_sample_biblio({ title => 'Silence in the library' }); + $builder->build_sample_biblio({ title => 'Silence in the shadow' }); my (undef, $initial_items_count) = SearchItems(undef, {rows => 1}); @@ -554,7 +554,7 @@ subtest 'Koha::Item(s) tests' => sub { # Create a biblio and item for testing t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( { homebranch => $library1->{branchcode}, @@ -595,7 +595,7 @@ subtest 'C4::Biblio::EmbedItemsInMarcBiblio' => sub { source => 'Itemtype', }); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $item_infos = [ { homebranch => $library1->{branchcode}, holdingbranch => $library1->{branchcode} }, { homebranch => $library1->{branchcode}, holdingbranch => $library1->{branchcode} }, @@ -722,7 +722,7 @@ subtest 'C4::Items::_build_default_values_for_mod_marc' => sub { my $itemtype = $builder->build({ source => 'Itemtype' })->{itemtype}; # Create a record with a barcode - my $biblio = $builder->gimme_a_biblio({ frameworkcode => $framework->{frameworkcode} }); + my $biblio = $builder->build_sample_biblio({ frameworkcode => $framework->{frameworkcode} }); my $item_record = new MARC::Record; my $a_barcode = 'a barcode'; my $barcode_field = MARC::Field->new( @@ -888,7 +888,7 @@ subtest 'Test logging for ModItem' => sub { # Create a biblio instance for testing t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); # Add an item. my ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $library->{branchcode}, holdingbranch => $library->{branchcode}, location => $location, itype => $itemtype->{itemtype} } , $biblio->biblionumber); diff --git a/t/db_dependent/Items/DelItem.t b/t/db_dependent/Items/DelItem.t index 4d719a4556..f865fa46ac 100644 --- a/t/db_dependent/Items/DelItem.t +++ b/t/db_dependent/Items/DelItem.t @@ -16,7 +16,7 @@ my $library = $builder->build({ source => 'Branch', }); -my $biblio = $builder->gimme_a_biblio(); +my $biblio = $builder->build_sample_biblio(); my ( $item_bibnum, $item_bibitemnum, $itemnumber ); ( $item_bibnum, $item_bibitemnum, $itemnumber ) = diff --git a/t/db_dependent/Items/GetItemsForInventory.t b/t/db_dependent/Items/GetItemsForInventory.t index b54d521848..ae5cd7e7ae 100755 --- a/t/db_dependent/Items/GetItemsForInventory.t +++ b/t/db_dependent/Items/GetItemsForInventory.t @@ -75,8 +75,8 @@ subtest 'Skip items with waiting holds' => sub { my $title_1 = 'Title 1, '; my $title_2 = 'Title 2, bizzarre one so doesn\'t already exist'; - my $biblio_1 = $builder->gimme_a_biblio({ itemtype => $itemtype->itemtype, title => $title_1 }); - my $biblio_2 = $builder->gimme_a_biblio({ itemtype => $itemtype->itemtype, title => $title_2 }); + my $biblio_1 = $builder->build_sample_biblio({ itemtype => $itemtype->itemtype, title => $title_1 }); + my $biblio_2 = $builder->build_sample_biblio({ itemtype => $itemtype->itemtype, title => $title_2 }); my ( $items_1, $first_items_count ) = GetItemsForInventory(); is( scalar @{$items_1}, $first_items_count, 'Results and count match' ); diff --git a/t/db_dependent/Koha/BiblioUtils/Iterator.t b/t/db_dependent/Koha/BiblioUtils/Iterator.t index 26a3c49483..c2c5a39f28 100644 --- a/t/db_dependent/Koha/BiblioUtils/Iterator.t +++ b/t/db_dependent/Koha/BiblioUtils/Iterator.t @@ -47,7 +47,7 @@ my $itemtype = $builder->build({ # Create a biblio instance for testing t::lib::Mocks::mock_preference('marcflavour', 'MARC21'); -my $biblio = $builder->gimme_a_biblio(); +my $biblio = $builder->build_sample_biblio(); # Add an item. my ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $library->{branchcode}, holdingbranch => $library->{branchcode}, location => $location, itype => $itemtype->{itemtype} } , $biblio->biblionumber); diff --git a/t/db_dependent/Koha/Biblios.t b/t/db_dependent/Koha/Biblios.t index 60c5157f25..2ea000d083 100644 --- a/t/db_dependent/Koha/Biblios.t +++ b/t/db_dependent/Koha/Biblios.t @@ -143,7 +143,7 @@ subtest 'can_be_transferred' => sub { my $library1 = $builder->build_object( { class => 'Koha::Libraries' } ); my $library2 = $builder->build_object( { class => 'Koha::Libraries' } ); my $library3 = $builder->build_object( { class => 'Koha::Libraries' } ); - my $biblio = $builder->gimme_a_biblio({ itemtype => 'ONLY1' }); + my $biblio = $builder->build_sample_biblio({ itemtype => 'ONLY1' }); my ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $library1->branchcode, holdingbranch => $library1->branchcode }, $biblio->biblionumber); my $item = Koha::Items->find($itemnumber); diff --git a/t/db_dependent/Labels/t_Label.t b/t/db_dependent/Labels/t_Label.t index 2a7c6ebc2f..069512c011 100644 --- a/t/db_dependent/Labels/t_Label.t +++ b/t/db_dependent/Labels/t_Label.t @@ -59,7 +59,7 @@ my $itemtype = t::lib::Mocks::mock_userenv({ branchcode => $branch_1 }); -my $bibnum = $builder->gimme_a_biblio({ frameworkcode => $frameworkcode })->biblionumber; +my $bibnum = $builder->build_sample_biblio({ frameworkcode => $frameworkcode })->biblionumber; # Create a helper item instance for testing my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( diff --git a/t/db_dependent/OAI/Sets.t b/t/db_dependent/OAI/Sets.t index ede51dac4c..f68552613f 100644 --- a/t/db_dependent/OAI/Sets.t +++ b/t/db_dependent/OAI/Sets.t @@ -355,10 +355,10 @@ ok (!defined(AddOAISetsBiblios(my $arg=[])), 'AddOAISetsBiblios with a no HASH a ok (defined(AddOAISetsBiblios($arg={})), 'AddOAISetsBiblios with a HASH argument is def'); # Create a biblio instance for testing -my $biblio_1 = $builder->gimme_a_biblio({ author => 'Moffat, Steven' }); +my $biblio_1 = $builder->build_sample_biblio({ author => 'Moffat, Steven' }); my $biblionumber1 = $biblio_1->biblionumber; isa_ok(\$biblionumber1, 'SCALAR', '$biblionumber1 is a SCALAR'); -my $biblio_2 = $builder->gimme_a_biblio({ author => 'Moffat, Steven' }); +my $biblio_2 = $builder->build_sample_biblio({ author => 'Moffat, Steven' }); my $biblionumber2 = $biblio_2->biblionumber; isa_ok(\$biblionumber2, 'SCALAR', '$biblionumber2 is a SCALAR'); @@ -521,7 +521,7 @@ ModOAISetMappings($setVH_id, $mappingsVH); #Create a biblio notice corresponding at one of mappings -my $biblio_VH = $builder->gimme_a_biblio({ author => 'Victor Hugo' }); +my $biblio_VH = $builder->build_sample_biblio({ author => 'Victor Hugo' }); my $biblionumberVH = $biblio_VH->biblionumber; #Update @@ -577,7 +577,7 @@ ModOAISetMappings($setNotVH_id, $mappingsNotVH); #Create a biblio notice corresponding at one of mappings -my $biblio_NotVH = $builder->gimme_a_biblio({ author => 'Sponge, Bob' }); +my $biblio_NotVH = $builder->build_sample_biblio({ author => 'Sponge, Bob' }); my $biblionumberNotVH = $biblio_NotVH->biblionumber; #Update diff --git a/t/db_dependent/Reserves.t b/t/db_dependent/Reserves.t index 3bb18285f9..47fd6ed7c2 100755 --- a/t/db_dependent/Reserves.t +++ b/t/db_dependent/Reserves.t @@ -79,7 +79,7 @@ my $itemtype = $builder->build( t::lib::Mocks::mock_userenv({ branchcode => $branch_1 }); -my $bibnum = $builder->gimme_a_biblio({frameworkcode => $frameworkcode})->biblionumber; +my $bibnum = $builder->build_sample_biblio({frameworkcode => $frameworkcode})->biblionumber; # Create a helper item instance for testing my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( @@ -212,7 +212,7 @@ $dbh->do( $branch_2, 10, 2, 'homebranch', ); -my $bibnum2 = $builder->gimme_a_biblio({frameworkcode => $frameworkcode})->biblionumber; +my $bibnum2 = $builder->build_sample_biblio({frameworkcode => $frameworkcode})->biblionumber; my ($itemnum_cpl, $itemnum_fpl); ( undef, undef, $itemnum_cpl ) = AddItem( diff --git a/t/db_dependent/Serials.t b/t/db_dependent/Serials.t index 125a6e5237..00d2ee6c47 100755 --- a/t/db_dependent/Serials.t +++ b/t/db_dependent/Serials.t @@ -143,7 +143,7 @@ subtest 'Values should not be erased on editing' => sub { plan tests => 1; - my $biblio = $builder->gimme_a_biblio(); + my $biblio = $builder->build_sample_biblio(); my $biblionumber = $biblio->biblionumber; my ( $icn_tag, $icn_sf ) = GetMarcFromKohaField( 'items.itemcallnumber', '' ); my ( $it_tag, $it_sf ) = GetMarcFromKohaField( 'items.itype', '' ); diff --git a/t/lib/TestBuilder.pm b/t/lib/TestBuilder.pm index d97243765f..c66291cf1f 100644 --- a/t/lib/TestBuilder.pm +++ b/t/lib/TestBuilder.pm @@ -127,7 +127,7 @@ sub build { }); } -sub gimme_a_biblio { +sub build_sample_biblio { my ( $self, $args ) = @_; my $title = $args->{title} || 'Some boring read'; -- 2.39.5