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 <jonathan.druart@bugs.koha-community.org>

diff --git a/cataloguing/value_builder/unimarc_field_105.pl b/cataloguing/value_builder/unimarc_field_105.pl
index caf0c6c..0afc26f 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
-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 72e87d0..547b408 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
-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 fbd03e1..50abed8 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
-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 ec1904f..ab23ad8 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
-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 f64c23f..bcdb244 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
-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 1c645a6..0e0dca7 100755 (executable)
--- 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 8bfe89a..c514349 100755 (executable)
--- 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 <http://www.gnu.org/licenses>.
 
 
-use Modern::Perl;
+use strict;
+#use warnings; FIXME - Bug 2505
 
 use CGI qw ( -utf8 );
 use C4::Output;