@@ -, +, @@ --- t/db_dependent/Reserves.t | 11 ++++++++++- 1 files changed, 10 insertions(+), 1 deletions(-) --- a/t/db_dependent/Reserves.t +++ a/t/db_dependent/Reserves.t @@ -2,7 +2,7 @@ use Modern::Perl; -use Test::More tests => 23; +use Test::More tests => 25; use MARC::Record; use DateTime::Duration; @@ -317,6 +317,15 @@ ModReserveAffect( $itemnumber, $requesters{'CPL'} , 0); #confirm hold is(defined $results[3]?1:0, 1, 'GetReservesFromItemnumber returns a future wait (confirmed future hold)'); # End of tests for bug 9788 +# Test GetReserveNextRank (bug 8918) +my $rank = C4::Reserves::GetReserveNextRank($bibnum2); +is($rank, 4, 'GetReserveNextRank should return rank 4'); +AddReserve('CPL', $requesters{'CPL'}, $bibnum2, $constraint, $bibitems, undef, + $resdate, $expdate, $notes, $title); +$rank = C4::Reserves::GetReserveNextRank($bibnum2); +is($rank, 5, 'GetReserveNextRank should return rank 5'); +# End of test GetReserveNextRank + $dbh->rollback; sub count_hold_print_messages { --