From 262f6f3d4c1d53dcfc5551e8f36584353fa9d382 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 15 Feb 2018 11:20:34 -0300 Subject: [PATCH] Bug 19996: (RM follow-up) Remove commented use warnings; These plugins are very noisy, badly written and I have no idea what they do. t/db_dependent/FrameworkPlugin.t outputs a log of warnings about " uninitialized value". Let fix them later. Signed-off-by: Jonathan Druart --- cataloguing/value_builder/unimarc_field_105.pl | 3 ++- cataloguing/value_builder/unimarc_field_110.pl | 3 ++- cataloguing/value_builder/unimarc_field_120.pl | 3 ++- cataloguing/value_builder/unimarc_field_130.pl | 3 ++- cataloguing/value_builder/unimarc_field_140.pl | 3 ++- cataloguing/value_builder/unimarc_field_225a.pl | 4 ++-- cataloguing/value_builder/unimarc_field_4XX.pl | 3 ++- 7 files changed, 14 insertions(+), 8 deletions(-) diff --git a/cataloguing/value_builder/unimarc_field_105.pl b/cataloguing/value_builder/unimarc_field_105.pl index caf0c6c484..0afc26f2cc 100755 --- a/cataloguing/value_builder/unimarc_field_105.pl +++ b/cataloguing/value_builder/unimarc_field_105.pl @@ -18,7 +18,8 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use Koha::Util::FrameworkPlugin qw(wrapper); use C4::Auth; diff --git a/cataloguing/value_builder/unimarc_field_110.pl b/cataloguing/value_builder/unimarc_field_110.pl index 72e87d091e..547b4087bd 100755 --- a/cataloguing/value_builder/unimarc_field_110.pl +++ b/cataloguing/value_builder/unimarc_field_110.pl @@ -18,7 +18,8 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use Koha::Util::FrameworkPlugin qw(wrapper); use C4::Auth; diff --git a/cataloguing/value_builder/unimarc_field_120.pl b/cataloguing/value_builder/unimarc_field_120.pl index fbd03e1899..50abed84fe 100755 --- a/cataloguing/value_builder/unimarc_field_120.pl +++ b/cataloguing/value_builder/unimarc_field_120.pl @@ -18,7 +18,8 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use Koha::Util::FrameworkPlugin qw(wrapper); use C4::Auth; diff --git a/cataloguing/value_builder/unimarc_field_130.pl b/cataloguing/value_builder/unimarc_field_130.pl index ec1904fbd2..ab23ad8e83 100755 --- a/cataloguing/value_builder/unimarc_field_130.pl +++ b/cataloguing/value_builder/unimarc_field_130.pl @@ -18,7 +18,8 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use Koha::Util::FrameworkPlugin qw(wrapper); use C4::Auth; diff --git a/cataloguing/value_builder/unimarc_field_140.pl b/cataloguing/value_builder/unimarc_field_140.pl index f64c23ffcd..bcdb24481e 100755 --- a/cataloguing/value_builder/unimarc_field_140.pl +++ b/cataloguing/value_builder/unimarc_field_140.pl @@ -18,7 +18,8 @@ # You should have received a copy of the GNU General Public License # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use Koha::Util::FrameworkPlugin qw(wrapper); use C4::Auth; diff --git a/cataloguing/value_builder/unimarc_field_225a.pl b/cataloguing/value_builder/unimarc_field_225a.pl index 1c645a65c0..0e0dca7dcd 100755 --- a/cataloguing/value_builder/unimarc_field_225a.pl +++ b/cataloguing/value_builder/unimarc_field_225a.pl @@ -39,8 +39,8 @@ It need : =cut -use Modern::Perl; - +use strict; +#use warnings; FIXME - Bug 2505 use C4::Auth; use CGI qw ( -utf8 ); use C4::Context; diff --git a/cataloguing/value_builder/unimarc_field_4XX.pl b/cataloguing/value_builder/unimarc_field_4XX.pl index 8bfe89abba..c51434954c 100755 --- a/cataloguing/value_builder/unimarc_field_4XX.pl +++ b/cataloguing/value_builder/unimarc_field_4XX.pl @@ -18,7 +18,8 @@ # along with Koha; if not, see . -use Modern::Perl; +use strict; +#use warnings; FIXME - Bug 2505 use CGI qw ( -utf8 ); use C4::Output; -- 2.39.5