View | Details | Raw Unified | Return to bug 13113
Collapse All | Expand All

(-)a/t/db_dependent/Reserves.t (-2 / +4 lines)
Lines 47-52 my $dbh = C4::Context->dbh; Link Here
47
$dbh->{AutoCommit} = 0;
47
$dbh->{AutoCommit} = 0;
48
$dbh->{RaiseError} = 1;
48
$dbh->{RaiseError} = 1;
49
49
50
# Somewhat arbitrary field chosen for age restriction unit tests. Must be added to db before the framework is cached
51
$dbh->do("update marc_subfield_structure set kohafield='biblioitems.agerestriction' where tagfield='521' and tagsubfield='a'");
52
50
# Setup Test------------------------
53
# Setup Test------------------------
51
54
52
# Add branches if not existing
55
# Add branches if not existing
Lines 481-487 C4::Context->set_preference( 'AgeRestrictionMarker', 'FSK|PEGI|Age|K' ); Link Here
481
484
482
#Set the ageRestriction for the Biblio
485
#Set the ageRestriction for the Biblio
483
my $record = GetMarcBiblio( $bibnum );
486
my $record = GetMarcBiblio( $bibnum );
484
my ( $ageres_tagid, $ageres_subfieldid ) = GetMarcFromKohaField( "biblioitems.agerestriction", '' );
487
my ( $ageres_tagid, $ageres_subfieldid ) = GetMarcFromKohaField( "biblioitems.agerestriction" );
485
$record->append_fields(  MARC::Field->new($ageres_tagid, '', '', $ageres_subfieldid => 'PEGI 16')  );
488
$record->append_fields(  MARC::Field->new($ageres_tagid, '', '', $ageres_subfieldid => 'PEGI 16')  );
486
C4::Biblio::ModBiblio( $record, $bibnum, '' );
489
C4::Biblio::ModBiblio( $record, $bibnum, '' );
487
490
488
- 

Return to bug 13113