my $index_subfield = CreateKey(); # create a specifique key for each subfield
- $value =~ s/"/"/g;
-
# determine maximum length; 9999 bytes per ISO 2709 except for leader and MARC21 008
my $max_length = 9999;
if ($tag eq '000') {
my $index_subfield = CreateKey(); # create a specifique key for each subfield
- $value =~ s/"/"/g;
-
# if there is no value provided but a default value in parameters, get it
if ( $value eq '' ) {
$value = $tagslib->{$tag}->{$subfield}->{defaultvalue} // q{};
my $username=(C4::Context->userenv?C4::Context->userenv->{'surname'}:"superlibrarian");
$value=~s/<<USER>>/$username/g;
}
- } else {
- $value =~ s/"/"/g;
}
-
+
$subfield_data{visibility} = "display:none;" if (($subfieldlib->{hidden} > 4) || ($subfieldlib->{hidden} <= -4));
-
+
my $pref_itemcallnumber = C4::Context->preference('itemcallnumber');
if (!$value && $subfieldlib->{kohafield} eq 'items.itemcallnumber' && $pref_itemcallnumber) {
my $CNtag = substr($pref_itemcallnumber, 0, 3);
foreach my $key (@names) {
if (defined $input->param($key)) {
$newdata{$key} = $input->param($key);
- $newdata{$key} =~ s/\"/"/g unless $key eq 'borrowernotes' or $key eq 'opacnote';
}
}
if ($clean ne $review) {
push @errors, {scrubbed=>$clean};
}
- my $js_ok_review = $clean;
- $js_ok_review =~ s/"/"/g; # probably redundant w/ TMPL ESCAPE=JS
- $template->param(clean_review=>$js_ok_review);
if ($savedreview) {
$savedreview->set(
{
$subfield_data{mandatory} = $tagslib->{$tag}->{$subfield}->{mandatory};
$subfield_data{repeatable} = $tagslib->{$tag}->{$subfield}->{repeatable};
my ($x,$value);
- $value =~ s/"/"/g;
- if ( !$value && $use_default_values) {
+ if ( $use_default_values) {
$value = $tagslib->{$tag}->{$subfield}->{defaultvalue};
# get today date & replace YYYY, MM, DD if provided in the default value
my $today = dt_from_string;