Lines 55-61
my $builder = t::lib::TestBuilder->new;
Link Here
|
55 |
my $frameworkcode = q||; |
55 |
my $frameworkcode = q||; |
56 |
|
56 |
|
57 |
# Somewhat arbitrary field chosen for age restriction unit tests. Must be added to db before the framework is cached |
57 |
# Somewhat arbitrary field chosen for age restriction unit tests. Must be added to db before the framework is cached |
58 |
$dbh->do("update marc_subfield_structure set kohafield='biblioitems.agerestriction' where tagfield='521' and tagsubfield='a' and frameworkcode=?", undef, $frameworkcode); |
58 |
$dbh->do(q| |
|
|
59 |
INSERT INTO marc_subfield_structure (frameworkcode, tagfield, tagsubfield, kohafield) |
60 |
VALUES ('', '521', 'a', 'biblioitems.agerestriction') |
61 |
ON DUPLICATE KEY UPDATE kohafield = VALUES(kohafield) |
62 |
|); |
59 |
my $cache = Koha::Caches->get_instance; |
63 |
my $cache = Koha::Caches->get_instance; |
60 |
$cache->clear_from_cache("MarcStructure-0-$frameworkcode"); |
64 |
$cache->clear_from_cache("MarcStructure-0-$frameworkcode"); |
61 |
$cache->clear_from_cache("MarcStructure-1-$frameworkcode"); |
65 |
$cache->clear_from_cache("MarcStructure-1-$frameworkcode"); |
62 |
- |
|
|