X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=admin%2Foai_set_mappings.pl;h=8c6b0d4255ed8c8091a6b88d7437284c2cb72a4f;hb=c5a758d9a06dba412a8564c8574c68eebf0b6ff8;hp=4d570f9f8107e3af97d8544e64001d7f3a4ace14;hpb=413a1e1e61b343db47b9b6fdecf3d981d87013ef;p=koha.git diff --git a/admin/oai_set_mappings.pl b/admin/oai_set_mappings.pl index 4d570f9f81..8c6b0d4255 100755 --- a/admin/oai_set_mappings.pl +++ b/admin/oai_set_mappings.pl @@ -3,18 +3,18 @@ # Copyright 2011 BibLibre SARL # 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 . =head1 NAME @@ -32,7 +32,7 @@ the OR operator will be applied. use Modern::Perl; -use CGI; +use CGI qw ( -utf8 ); use C4::Auth; use C4::Output; use C4::OAI::Sets; @@ -45,7 +45,7 @@ my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( { query => $input, type => 'intranet', authnotrequired => 0, - flagsrequired => { 'parameters' => '*' }, + flagsrequired => { 'parameters' => 'parameters_remaining_permissions' }, debug => 1, } ); @@ -53,17 +53,19 @@ my $id = $input->param('id'); my $op = $input->param('op'); if($op && $op eq "save") { - my @marcfields = $input->param('marcfield'); - my @marcsubfields = $input->param('marcsubfield'); - my @marcvalues = $input->param('marcvalue'); + my @marcfields = $input->multi_param('marcfield'); + my @marcsubfields = $input->multi_param('marcsubfield'); + my @operators = $input->multi_param('operator'); + my @marcvalues = $input->multi_param('marcvalue'); my @mappings; my $i = 0; while($i < @marcfields and $i < @marcsubfields and $i < @marcvalues) { - if($marcfields[$i] and $marcsubfields[$i] and $marcvalues[$i]) { + if($marcfields[$i] and $marcsubfields[$i]) { push @mappings, { marcfield => $marcfields[$i], marcsubfield => $marcsubfields[$i], + operator => $operators[$i], marcvalue => $marcvalues[$i] }; }