|
Lines 564-570
subtest 'pickup_locations() tests' => sub {
Link Here
|
| 564 |
|
564 |
|
| 565 |
plan tests => 70; |
565 |
plan tests => 70; |
| 566 |
|
566 |
|
| 567 |
t::lib::Mocks::mock_preference('canreservefromotherbranches', 1); |
567 |
t::lib::Mocks::mock_preference( 'canreservefromotherbranches', 1 ); |
| 568 |
$schema->storage->txn_begin; |
568 |
$schema->storage->txn_begin; |
| 569 |
|
569 |
|
| 570 |
my $dbh = C4::Context->dbh; |
570 |
my $dbh = C4::Context->dbh; |
|
Lines 903-909
subtest 'pickup_locations() tests' => sub {
Link Here
|
| 903 |
grep { $pickup_location->branchcode eq $_ } @branchcodes |
903 |
grep { $pickup_location->branchcode eq $_ } @branchcodes |
| 904 |
} $item4->pickup_locations( { patron => $patron5 } )->as_list; |
904 |
} $item4->pickup_locations( { patron => $patron5 } )->as_list; |
| 905 |
ok( |
905 |
ok( |
| 906 |
scalar(@pickup_locations) == 1 && @pickup_locations[0] eq $library4->branchcode, |
906 |
scalar(@pickup_locations) == 1 && $pickup_locations[0] eq $library4->branchcode, |
| 907 |
'There should be only one branch in the pickup locations, the connected branch' |
907 |
'There should be only one branch in the pickup locations, the connected branch' |
| 908 |
); |
908 |
); |
| 909 |
|
909 |
|
| 910 |
- |
|
|