X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2Fdb_dependent%2FCirculation.t;h=73c0bf36b5fb41bfd32edad9e0c41e9314004c8a;hb=f4251e85facb4e8597b2879dea1ea02e21d6a763;hp=aa2a969da90ad82a343914d24c1f80c30ee60acc;hpb=0d5f73d9b093c76982c629562d17b9328844c103;p=koha.git diff --git a/t/db_dependent/Circulation.t b/t/db_dependent/Circulation.t index aa2a969da9..73c0bf36b5 100755 --- a/t/db_dependent/Circulation.t +++ b/t/db_dependent/Circulation.t @@ -9,7 +9,7 @@ use C4::Items; use C4::Members; use C4::Reserves; -use Test::More tests => 44; +use Test::More tests => 45; BEGIN { use_ok('C4::Circulation'); @@ -201,6 +201,17 @@ C4::Context->dbh->do("DELETE FROM accountlines"); $biblionumber ); + my $barcode3 = 'R00000346'; + my ( $item_bibnum3, $item_bibitemnum3, $itemnumber3 ) = AddItem( + { + homebranch => $branch, + holdingbranch => $branch, + barcode => $barcode3, + replacementprice => 23.00 + }, + $biblionumber + ); + # Create 2 borrowers my %renewing_borrower_data = ( firstname => 'John', @@ -259,8 +270,14 @@ C4::Context->dbh->do("DELETE FROM accountlines"); is( $error, 'on_reserve', '(Bug 10663) Cannot renew, reserved (returned error is on_reserve)'); my $reserveid = C4::Reserves::GetReserveId({ biblionumber => $biblionumber, borrowernumber => $reserving_borrowernumber}); - CancelReserve({ reserve_id => $reserveid }); - + my $reserving_borrower = GetMember( borrowernumber => $reserving_borrowernumber ); + AddIssue($reserving_borrower, $barcode3); + my $reserve = $dbh->selectrow_hashref( + 'SELECT * FROM old_reserves WHERE reserve_id = ?', + { Slice => {} }, + $reserveid + ); + is($reserve->{found}, 'F', 'hold marked completed when checking out item that fills it'); diag("Item-level hold, renewal test"); AddReserve(