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 |
- |
|
|