Lines 156-161
subtest "as_marc_field() tests" => sub {
Link Here
|
156 |
}; |
156 |
}; |
157 |
|
157 |
|
158 |
subtest 'pickup_locations' => sub { |
158 |
subtest 'pickup_locations' => sub { |
|
|
159 |
plan tests => 66; |
159 |
|
160 |
|
160 |
$schema->storage->txn_begin; |
161 |
$schema->storage->txn_begin; |
161 |
|
162 |
|
Lines 173-178
subtest 'pickup_locations' => sub {
Link Here
|
173 |
my $group2_1 = $builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library3->branchcode } } ); |
174 |
my $group2_1 = $builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library3->branchcode } } ); |
174 |
my $group2_2 = $builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library4->branchcode } } ); |
175 |
my $group2_2 = $builder->build_object( { class => 'Koha::Library::Groups', value => { parent_id => $root2->id, branchcode => $library4->branchcode } } ); |
175 |
|
176 |
|
|
|
177 |
our @branchcodes = ( |
178 |
$library1->branchcode, $library2->branchcode, |
179 |
$library3->branchcode, $library4->branchcode |
180 |
); |
176 |
|
181 |
|
177 |
my $item1 = $builder->build_sample_item( |
182 |
my $item1 = $builder->build_sample_item( |
178 |
{ |
183 |
{ |
Lines 208-214
subtest 'pickup_locations' => sub {
Link Here
|
208 |
my $patron4 = $builder->build_object( { class => 'Koha::Patrons', value => { branchcode => $library4->branchcode, firstname => '4' } } ); |
213 |
my $patron4 = $builder->build_object( { class => 'Koha::Patrons', value => { branchcode => $library4->branchcode, firstname => '4' } } ); |
209 |
|
214 |
|
210 |
my $all_count = Koha::Libraries->search({ pickup_location => 1})->count(); |
215 |
my $all_count = Koha::Libraries->search({ pickup_location => 1})->count(); |
211 |
plan tests => ($all_count +1) * 7 + 31 + 61; |
|
|
212 |
|
216 |
|
213 |
my $results = { |
217 |
my $results = { |
214 |
"1-1-1-any" => $all_count, |
218 |
"1-1-1-any" => $all_count, |
Lines 291-296
subtest 'pickup_locations' => sub {
Link Here
|
291 |
my $ha_value=$ha==3?'holdgroup':($ha==2?'any':'homebranch'); |
295 |
my $ha_value=$ha==3?'holdgroup':($ha==2?'any':'homebranch'); |
292 |
|
296 |
|
293 |
foreach my $pickup_location (@pl) { |
297 |
foreach my $pickup_location (@pl) { |
|
|
298 |
next |
299 |
unless grep { $pickup_location eq $_ } @branchcodes; |
294 |
is( ref($pickup_location), 'Koha::Library', 'Object type is correct' ); |
300 |
is( ref($pickup_location), 'Koha::Library', 'Object type is correct' ); |
295 |
} |
301 |
} |
296 |
ok( |
302 |
ok( |
297 |
- |
|
|