Lines 2401-2407
subtest "AllowRenewalIfOtherItemsAvailable tests" => sub {
Link Here
|
2401 |
} |
2401 |
} |
2402 |
|
2402 |
|
2403 |
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub { |
2403 |
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub { |
2404 |
plan tests => 26; |
2404 |
plan tests => 27; |
2405 |
|
2405 |
|
2406 |
my $homebranch = $builder->build( { source => 'Branch' } ); |
2406 |
my $homebranch = $builder->build( { source => 'Branch' } ); |
2407 |
my $holdingbranch = $builder->build( { source => 'Branch' } ); |
2407 |
my $holdingbranch = $builder->build( { source => 'Branch' } ); |
Lines 2461-2466
subtest 'CanBookBeIssued & AllowReturnToBranch' => sub {
Link Here
|
2461 |
keys(%$error) + keys(%$alerts), 0, |
2461 |
keys(%$error) + keys(%$alerts), 0, |
2462 |
'There should not be any errors or alerts (impossible)' . str( $error, $question, $alerts ) |
2462 |
'There should not be any errors or alerts (impossible)' . str( $error, $question, $alerts ) |
2463 |
); |
2463 |
); |
|
|
2464 |
( $error, $question, $alerts ) = CanBookBeIssued( $patron_2, undef, undef, 0, 0, { item => $item } ); |
2465 |
is( |
2466 |
keys(%$error) + keys(%$alerts), 0, |
2467 |
'There should not be any errors or alerts (impossible) when passing a valid item object rather than a barcode' |
2468 |
. str( $error, $question, $alerts ) |
2469 |
); |
2464 |
is( exists $question->{ISSUED_TO_ANOTHER}, 1, 'ISSUED_TO_ANOTHER must be set' ); |
2470 |
is( exists $question->{ISSUED_TO_ANOTHER}, 1, 'ISSUED_TO_ANOTHER must be set' ); |
2465 |
## Can be issued from holdingbranch |
2471 |
## Can be issued from holdingbranch |
2466 |
set_userenv($holdingbranch); |
2472 |
set_userenv($holdingbranch); |
2467 |
- |
|
|