Lines 24-29
use C4::Biblio qw( AddBiblio ModBiblio ModBiblioMarc );
Link Here
|
24 |
use C4::Circulation qw( AddIssue AddReturn ); |
24 |
use C4::Circulation qw( AddIssue AddReturn ); |
25 |
|
25 |
|
26 |
use Koha::Database; |
26 |
use Koha::Database; |
|
|
27 |
use Koha::Cache::Memory::Lite; |
27 |
use Koha::Caches; |
28 |
use Koha::Caches; |
28 |
use Koha::Acquisition::Orders; |
29 |
use Koha::Acquisition::Orders; |
29 |
use Koha::AuthorisedValueCategories; |
30 |
use Koha::AuthorisedValueCategories; |
Lines 435-440
subtest 'pickup_locations' => sub {
Link Here
|
435 |
} |
436 |
} |
436 |
|
437 |
|
437 |
foreach my $cbranch ('ItemHomeLibrary','PatronLibrary') { |
438 |
foreach my $cbranch ('ItemHomeLibrary','PatronLibrary') { |
|
|
439 |
my $cache = Koha::Cache::Memory::Lite->get_instance(); |
440 |
$cache->flush(); |
438 |
foreach my $biblio ($biblio1, $biblio2) { |
441 |
foreach my $biblio ($biblio1, $biblio2) { |
439 |
foreach my $patron ($patron1, $patron8) { |
442 |
foreach my $patron ($patron1, $patron8) { |
440 |
_doTest($cbranch, $biblio, $patron, $results); |
443 |
_doTest($cbranch, $biblio, $patron, $results); |
441 |
- |
|
|