@@ -, +, @@ --- .../value_builder/unimarc_field_182a.pl | 74 ------------ .../value_builder/unimarc_field_182c.pl | 74 ------------ ..._field_182-2.pl => unimarc_field_183-2.pl} | 4 +- .../value_builder/unimarc_field_183a.pl | 2 - .../value_builder/unimarc_field_182-2.tt | 58 ---------- .../value_builder/unimarc_field_182a.tt | 95 ---------------- .../value_builder/unimarc_field_182c.tt | 105 ------------------ .../value_builder/unimarc_field_183-2.tt | 2 +- 8 files changed, 3 insertions(+), 411 deletions(-) delete mode 100755 cataloguing/value_builder/unimarc_field_182a.pl delete mode 100755 cataloguing/value_builder/unimarc_field_182c.pl rename cataloguing/value_builder/{unimarc_field_182-2.pl => unimarc_field_183-2.pl} (96%) delete mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182-2.tt delete mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182a.tt delete mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182c.tt --- a/cataloguing/value_builder/unimarc_field_182a.pl +++ a/cataloguing/value_builder/unimarc_field_182a.pl @@ -1,74 +0,0 @@ -#!/usr/bin/perl - -# Copyright 2014 Rijksmuseum -# -# 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 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. -# -# You should have received a copy of the GNU General Public License -# along with Koha; if not, see . - -use Modern::Perl; - -use Date::Calc; - -use Koha::Util::FrameworkPlugin qw(wrapper); -use C4::Auth qw( get_template_and_user ); -use CGI qw ( -utf8 ); -use C4::Context; -use C4::Output qw( output_html_with_http_headers ); - -my $builder= sub { - my $params = shift; - my $id = $params->{id}; - - return qq| -|; -}; - -my $launcher= sub { - my $params = shift; - my $cgi = $params->{cgi}; - my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ - template_name => "cataloguing/value_builder/unimarc_field_182a.tt", - query => $cgi, - type => "intranet", - flagsrequired => {editcatalogue => '*'}, - }); - my $results = scalar $cgi->param('result'); - - $template->param( - index => scalar $cgi->param('index'), - result => $results, - ); - - # Return the result of the position in the string, ex: abcde = 1=a, 2=b, 3=c... - my @x = split(//, $results); - my $i = 1; - for my $fresult (@x) { - $template->param("f$i" => $fresult); - ++$i; - } - output_html_with_http_headers $cgi, $cookie, $template->output; -}; - -# Return the hashref with the builder and launcher to FrameworkPlugin object. -# NOTE: If you do not need a popup but only use e.g. Focus, Blur etc. for a -# particular plugin, you only need to define and return the builder. -return { builder => $builder, launcher => $launcher }; --- a/cataloguing/value_builder/unimarc_field_182c.pl +++ a/cataloguing/value_builder/unimarc_field_182c.pl @@ -1,74 +0,0 @@ -#!/usr/bin/perl - -# Copyright 2014 Rijksmuseum -# -# 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 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. -# -# You should have received a copy of the GNU General Public License -# along with Koha; if not, see . - -use Modern::Perl; - -use Date::Calc; - -use Koha::Util::FrameworkPlugin qw(wrapper); -use C4::Auth qw( get_template_and_user ); -use CGI qw ( -utf8 ); -use C4::Context; -use C4::Output qw( output_html_with_http_headers ); - -my $builder= sub { - my $params = shift; - my $id = $params->{id}; - - return qq| -|; -}; - -my $launcher= sub { - my $params = shift; - my $cgi = $params->{cgi}; - my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ - template_name => "cataloguing/value_builder/unimarc_field_182c.tt", - query => $cgi, - type => "intranet", - flagsrequired => {editcatalogue => '*'}, - }); - my $results = scalar $cgi->param('result'); - - $template->param( - index => scalar $cgi->param('index'), - result => $results, - ); - - # Return the result of the position in the string, ex: abcde = 1=a, 2=b, 3=c... - my @x = split(//, $results); - my $i = 1; - for my $fresult (@x) { - $template->param("f$i" => $fresult); - ++$i; - } - output_html_with_http_headers $cgi, $cookie, $template->output; -}; - -# Return the hashref with the builder and launcher to FrameworkPlugin object. -# NOTE: If you do not need a popup but only use e.g. Focus, Blur etc. for a -# particular plugin, you only need to define and return the builder. -return { builder => $builder, launcher => $launcher }; --- a/cataloguing/value_builder/unimarc_field_182-2.pl +++ a/cataloguing/value_builder/unimarc_field_182-2.pl @@ -36,7 +36,7 @@ my $builder= sub { function Click$id(event) { var fieldvalue=\$('#'+event.data.id).val(); - window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=unimarc_field_182-2.pl&index=\"+event.data.id+\"&result=\"+fieldvalue,\"tag_editor\",'width=700,height=700,toolbar=false,scrollbars=yes'); + window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=unimarc_field_183-2.pl&index=\"+event.data.id+\"&result=\"+fieldvalue,\"tag_editor\",'width=700,height=700,toolbar=false,scrollbars=yes'); return false; /* prevents scrolling */ } |; @@ -46,7 +46,7 @@ my $launcher= sub { my $params = shift; my $cgi = $params->{cgi}; my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ - template_name => "cataloguing/value_builder/unimarc_field_182-2.tt", + template_name => "cataloguing/value_builder/unimarc_field_183-2.tt", query => $cgi, type => "intranet", flagsrequired => {editcatalogue => '*'}, --- a/cataloguing/value_builder/unimarc_field_183a.pl +++ a/cataloguing/value_builder/unimarc_field_183a.pl @@ -26,8 +26,6 @@ use C4::Auth qw( get_template_and_user ); use CGI qw ( -utf8 ); use C4::Context; use C4::Output qw( output_html_with_http_headers ); -use Data::Dumper; - my $builder= sub { my $params = shift; --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182-2.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182-2.tt @@ -1,58 +0,0 @@ -[% INCLUDE 'doc-head-open.inc' %] -Framework plugin example › Cataloguing › Koha -[% INCLUDE 'doc-head-close.inc' %] - - - - -

UNIMARC field 182-2 builder

- -
- - - - - -
- -
-

Cancel

-
- - - -[% INCLUDE 'popup-bottom.inc' %] --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182a.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182a.tt @@ -1,95 +0,0 @@ -[% INCLUDE 'doc-head-open.inc' %] -Framework plugin example › Cataloguing › Koha -[% INCLUDE 'doc-head-close.inc' %] - - - - -

UNIMARC field 182a builder

- -
- - - - - - -
- -
-

Cancel

-
- - - -[% INCLUDE 'popup-bottom.inc' %] --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182c.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_182c.tt @@ -1,105 +0,0 @@ -[% INCLUDE 'doc-head-open.inc' %] -Framework plugin example › Cataloguing › Koha -[% INCLUDE 'doc-head-close.inc' %] - - - - -

UNIMARC field 182c builder

- -
- - - - - - -
- -
-

Cancel

-
- - - -[% INCLUDE 'popup-bottom.inc' %] --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_183-2.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_183-2.tt @@ -3,7 +3,7 @@ [% INCLUDE 'doc-head-close.inc' %] - +

UNIMARC field 183-2 builder

--