|
Lines 2-8
Link Here
|
| 2 |
|
2 |
|
| 3 |
use Modern::Perl; |
3 |
use Modern::Perl; |
| 4 |
|
4 |
|
| 5 |
use Test::More tests => 31; |
5 |
use Test::More tests => 39; |
| 6 |
use MARC::Record; |
6 |
use MARC::Record; |
| 7 |
use DateTime::Duration; |
7 |
use DateTime::Duration; |
| 8 |
|
8 |
|
|
Lines 229-234
is( $messages->{ResFound}->{borrowernumber},
Link Here
|
| 229 |
$requesters{'RPL'}, |
229 |
$requesters{'RPL'}, |
| 230 |
'for generous library, its items fill first hold request in line (bug 10272)'); |
230 |
'for generous library, its items fill first hold request in line (bug 10272)'); |
| 231 |
|
231 |
|
|
|
232 |
my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber}); |
| 233 |
isa_ok($reserves, 'ARRAY'); |
| 234 |
is(scalar @$reserves, 1, "Only one reserves for this biblio"); |
| 235 |
my $reserve_id = $reserves->[0]->{reserve_id}; |
| 236 |
|
| 237 |
$reserve = GetReserve($reserve_id); |
| 238 |
isa_ok($reserve, 'HASH', "GetReserve return"); |
| 239 |
is($reserve->{biblionumber}, $biblionumber); |
| 240 |
|
| 241 |
$reserve = CancelReserveFromId($reserve_id); |
| 242 |
isa_ok($reserve, 'HASH', "CancelReserveFromId return"); |
| 243 |
is($reserve->{biblionumber}, $biblionumber); |
| 244 |
|
| 245 |
$reserve = GetReserve($reserve_id); |
| 246 |
is($reserve, undef, "GetReserve returns undef after deletion"); |
| 247 |
|
| 248 |
$reserve = CancelReserveFromId($reserve_id); |
| 249 |
is($reserve, undef, "CancelReserveFromId return undef if reserve does not exist"); |
| 250 |
|
| 232 |
# Tests for bug 9761 (ConfirmFutureHolds): new CheckReserves lookahead parameter, and corresponding change in AddReturn |
251 |
# Tests for bug 9761 (ConfirmFutureHolds): new CheckReserves lookahead parameter, and corresponding change in AddReturn |
| 233 |
# Note that CheckReserve uses its lookahead parameter and does not check ConfirmFutureHolds pref (it should be passed if needed like AddReturn does) |
252 |
# Note that CheckReserve uses its lookahead parameter and does not check ConfirmFutureHolds pref (it should be passed if needed like AddReturn does) |
| 234 |
# Test 9761a: Add a reserve without date, CheckReserve should return it |
253 |
# Test 9761a: Add a reserve without date, CheckReserve should return it |
| 235 |
- |
|
|