Bug 11926: Package updates

[srvgit] / cataloguing / value_builder / normarc_field_008.pl

diff --git a/cataloguing/value_builder/normarc_field_008.pl b/cataloguing/value_builder/normarc_field_008.pl
index 5efe9a8..d5acce0 100755 (executable)
--- a/cataloguing/value_builder/normarc_field_008.pl
+++ b/cataloguing/value_builder/normarc_field_008.pl
@@ -25,9 +25,11 @@ use C4::Context;
 use C4::Search;
 use C4::Output;
 
-=head1
+=head1 FUNCTIONS
 
-plugin_parameters : other parameters added when the plugin is called by the dopop function
+=head2 plugin_parameters
+
+Other parameters added when the plugin is called by the dopop function
 
 =cut
 
@@ -58,7 +60,7 @@ function Focus$function_name(subfield_managed) {
        if ( document.getElementById(\"$field_number\").value ) {
        }
        else {
-        document.getElementById(\"$field_number\").value='$dateentered' + 't        xxu||||| |||| 00| 0 $lang d';
+        document.getElementById(\"$field_number\").value='$dateentered' + 't        no ||||| |||| 00| 0 $lang d';
        }
     return 1;
 }
@@ -91,7 +93,7 @@ sub plugin {
     my $dbh = C4::Context->dbh;
 
     my ($template, $loggedinuser, $cookie) = get_template_and_user(
-        {   template_name   => "cataloguing/value_builder/normarc_field_008.tmpl",
+        {   template_name   => "cataloguing/value_builder/normarc_field_008.tt",
             query           => $input,
             type            => "intranet",
             authnotrequired => 0,
@@ -101,7 +103,7 @@ sub plugin {
     );
 
     #  $result = "      t        xxu           00  0 eng d" unless $result;
-    $result = "$dateentered" . "t        xxu||||| |||| 00| 0 $lang d" unless $result;
+    $result = "$dateentered" . "t        no ||||| |||| 00| 0 $lang d" unless $result;
     my $f1    = substr($result, 0,  6);
     my $f6    = substr($result, 6,  1);
     my $f710  = substr($result, 7,  4);