X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=cataloguing%2Fvalue_builder%2Funimarc_field_123j.pl;h=52cb4bf6fa2434ef2af35e2e852b6d186c140105;hb=57d74255498ab428b887bf9022cc3eae6a8b8bf7;hp=da6d38d1e71861a267f1398b10165a260f76f223;hpb=5c42b6512e7ee74811f6d78eaf0c1d5ed55f9d8a;p=koha.git diff --git a/cataloguing/value_builder/unimarc_field_123j.pl b/cataloguing/value_builder/unimarc_field_123j.pl index da6d38d1e7..52cb4bf6fa 100755 --- a/cataloguing/value_builder/unimarc_field_123j.pl +++ b/cataloguing/value_builder/unimarc_field_123j.pl @@ -5,54 +5,36 @@ # # This file is part of Koha. # -# Koha is free software; you can redistribute it and/or modify it under the -# terms of the GNU General Public License as published by the Free Software -# Foundation; either version 2 of the License, or (at your option) any later -# version. +# Koha is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. # -# Koha is distributed in the hope that it will be useful, but WITHOUT ANY -# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR -# A PARTICULAR PURPOSE. See the GNU General Public License for more details. +# Koha is distributed in the hope that it will be useful, but +# WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. # -# You should have received a copy of the GNU General Public License along -# with Koha; if not, write to the Free Software Foundation, Inc., -# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. +# You should have received a copy of the GNU General Public License +# along with Koha; if not, see . use strict; +#use warnings; FIXME - Bug 2505 use C4::Auth; -use CGI; +use CGI qw ( -utf8 ); use C4::Context; use C4::Search; use C4::Output; -=head1 - -plugin_parameters : other parameters added when the plugin is called by the dopop function - -=cut - -sub plugin_parameters { - my ($dbh,$record,$tagslib,$i,$tabloop) = @_; - return ""; -} - sub plugin_javascript { my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_; my $function_name= $field_number; my $res=" @@ -72,7 +54,7 @@ sub plugin { my ($template, $loggedinuser, $cookie) = get_template_and_user( { - template_name => "cataloguing/value_builder/unimarc_field_123j.tmpl", + template_name => "cataloguing/value_builder/unimarc_field_123i_j.tt", query => $input, type => "intranet", authnotrequired => 0, @@ -85,11 +67,9 @@ sub plugin { my $f3 = substr($result,4,2); my $f4 = substr($result,6,2); $template->param(index => $index, - "f1$f1" => 1, + "f1".($f1 eq '-'?'s':'n') => 1, f2 => $f2, f3 => $f3, f4 => $f4); output_html_with_http_headers $input, $cookie, $template->output; } - -1;