Bugzilla – Attachment 83857 Details for
Bug 20022
use Modern::Perl in t (test) perl scripts
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 20022 - use Modern::Perl in t (test) perl scripts
Bug-20022---use-ModernPerl-in-t-test-perl-scripts.patch (text/plain), 24.23 KB, created by
Aleisha Amohia
on 2019-01-13 21:38:17 UTC
(
hide
)
Description:
Bug 20022 - use Modern::Perl in t (test) perl scripts
Filename:
MIME Type:
Creator:
Aleisha Amohia
Created:
2019-01-13 21:38:17 UTC
Size:
24.23 KB
patch
obsolete
>From 5e9c9ed20186b48dcf2ebb5678481bf8d9fdf753 Mon Sep 17 00:00:00 2001 >From: Grace Smyth <gracesmythh@gmail.com> >Date: Thu, 18 Jan 2018 21:09:11 +0000 >Subject: [PATCH] Bug 20022 - use Modern::Perl in t (test) perl scripts > >Test Plan: >Check the following files have been updated from >use strict; >use warnings; >to >use Modern::Perl; > >00-checkdatabase-version.t >00-deprecated.t >00-valid-xml.t >AuthoritiesMarc_MARC21.t >AuthoritiesMarc_UNIMARC.t >Barcodes_EAN13.t >Barcodes_hbyymmincr.t >Barcodes_incremental.t >Bookseller.t >Budgets.t >ClassSortRoutine.t >ClassSortRoutine_Dewey.t >ClassSortRoutine_Generic.t >ClassSortRoutine_LCC.t >ClassSource.t >Contract.t >Creators.t >EdiInvoice.t >Edifact.t >Ediorder.t >Ediordrsp.t >External/Syndetics.t >Form_MessagingPreferences.t >Heading.t >HtmlTags.t >Installer_PerlDependencies.t >Installer_pm.t >ItemCirculationAlertPreference.t >Koha_Util_MARC.t >Labels.t >Labels_split_ccn.t >Labels_split_ddcn.t >Labels_split_lccn.t >Log.t >Members_Attributes.t >Members_Messaging.t >Output.t >Output_JSONStream.t >Patroncards.t >Patroncards_Batch.t >Patroncards_Layout.t >Patroncards_Lib.t >Patroncards_Patroncard.t >Patroncards_Profile.t >Patroncards_Template.t >Print.t >QueryParser.t >Scheduler.t >Scrubber.t >Stats.t >SuggestionEngine.t >TmplToken.t >db_dependent/00-strict.t >db_dependent/Amazon.t >db_dependent/Heading_MARC21.t >db_dependent/LDAP/test_ldap_add.pl >db_dependent/Languages.t >db_dependent/MungeMarcPrice.t >db_dependent/Record/Record.t >db_dependent/RecordProcessor_EmbedSeeFromHeadings.t >db_dependent/Reports.t >db_dependent/Service.t >db_dependent/SuggestionEngine_ExplodedTerms.t >db_dependent/Tags.t > >:) >--- > t/00-checkdatabase-version.t | 3 +-- > t/00-deprecated.t | 3 +-- > t/00-valid-xml.t | 3 +-- > t/AuthoritiesMarc_MARC21.t | 3 +-- > t/AuthoritiesMarc_UNIMARC.t | 3 +-- > t/Barcodes_EAN13.t | 3 +-- > t/Barcodes_annual.t | 3 +-- > t/Barcodes_hbyymmincr.t | 3 +-- > t/Barcodes_incremental.t | 3 +-- > t/Bookseller.t | 3 +-- > t/Budgets.t | 3 +-- > t/ClassSortRoutine.t | 3 +-- > t/ClassSortRoutine_Dewey.t | 3 +-- > t/ClassSortRoutine_Generic.t | 3 +-- > t/ClassSortRoutine_LCC.t | 3 +-- > t/ClassSource.t | 3 +-- > t/Contract.t | 3 +-- > t/Creators.t | 3 +-- > t/EdiInvoice.t | 3 +-- > t/Edifact.t | 3 +-- > t/Ediorder.t | 3 +-- > t/Ediordrsp.t | 3 +-- > t/External/Syndetics.t | 3 +-- > t/Form_MessagingPreferences.t | 3 +-- > t/Heading.t | 3 +-- > t/HtmlTags.t | 3 +-- > t/Installer_PerlDependencies.t | 3 +-- > t/Installer_pm.t | 3 +-- > t/ItemCirculationAlertPreference.t | 3 +-- > t/Koha_Util_MARC.t | 3 +-- > t/Labels.t | 3 +-- > t/Labels_split_ccn.t | 3 +-- > t/Labels_split_ddcn.t | 3 +-- > t/Labels_split_lccn.t | 3 +-- > t/Members_Attributes.t | 3 +-- > t/Members_Messaging.t | 3 +-- > t/Output.t | 3 +-- > t/Output_JSONStream.t | 3 +-- > t/Patroncards.t | 3 +-- > t/Patroncards_Batch.t | 3 +-- > t/Patroncards_Layout.t | 3 +-- > t/Patroncards_Lib.t | 3 +-- > t/Patroncards_Patroncard.t | 3 +-- > t/Patroncards_Profile.t | 3 +-- > t/Patroncards_Template.t | 3 +-- > t/Print.t | 3 +-- > t/QueryParser.t | 3 +-- > t/Scheduler.t | 3 +-- > t/Scrubber.t | 3 +-- > t/Stats.t | 3 +-- > t/SuggestionEngine.t | 3 +-- > t/TmplToken.t | 3 +-- > t/db_dependent/00-strict.t | 4 +--- > t/db_dependent/Amazon.t | 3 +-- > t/db_dependent/Heading_MARC21.t | 3 +-- > t/db_dependent/LDAP/test_ldap_add.pl | 3 +-- > t/db_dependent/Record/Record.t | 3 +-- > t/db_dependent/RecordProcessor_EmbedSeeFromHeadings.t | 3 +-- > t/db_dependent/Reports.t | 3 +-- > t/db_dependent/Service.t | 3 +-- > t/db_dependent/SuggestionEngine_ExplodedTerms.t | 3 +-- > t/db_dependent/Tags.t | 3 +-- > 62 files changed, 62 insertions(+), 125 deletions(-) > >diff --git a/t/00-checkdatabase-version.t b/t/00-checkdatabase-version.t >index 9e94cbe..f72192b 100644 >--- a/t/00-checkdatabase-version.t >+++ b/t/00-checkdatabase-version.t >@@ -15,8 +15,7 @@ > # You should have received a copy of the GNU General Public License > # along with Koha; if not, see <http://www.gnu.org/licenses>. > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More; > use File::Spec; >diff --git a/t/00-deprecated.t b/t/00-deprecated.t >index 6eba09d..03b89b2 100755 >--- a/t/00-deprecated.t >+++ b/t/00-deprecated.t >@@ -3,8 +3,7 @@ > # Tests usage of deprecated Perl syntax. Deprecated could be extended to the > # sense of 'not allowed'. > # >-use warnings; >-use strict; >+use Modern::Perl; > use Test::More tests => 1; > use File::Find; > use Cwd; >diff --git a/t/00-valid-xml.t b/t/00-valid-xml.t >index 2c5393a..bf11d7b 100644 >--- a/t/00-valid-xml.t >+++ b/t/00-valid-xml.t >@@ -15,8 +15,7 @@ > # You should have received a copy of the GNU General Public License > # along with Koha; if not, see <http://www.gnu.org/licenses>. > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More; > use File::Spec; >diff --git a/t/AuthoritiesMarc_MARC21.t b/t/AuthoritiesMarc_MARC21.t >index fbf713a..2741279 100755 >--- a/t/AuthoritiesMarc_MARC21.t >+++ b/t/AuthoritiesMarc_MARC21.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 4; > use MARC::Record; >diff --git a/t/AuthoritiesMarc_UNIMARC.t b/t/AuthoritiesMarc_UNIMARC.t >index 4d26f39..aeda817 100755 >--- a/t/AuthoritiesMarc_UNIMARC.t >+++ b/t/AuthoritiesMarc_UNIMARC.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 2; > >diff --git a/t/Barcodes_EAN13.t b/t/Barcodes_EAN13.t >index c3c9046..e982c14 100755 >--- a/t/Barcodes_EAN13.t >+++ b/t/Barcodes_EAN13.t >@@ -2,8 +2,7 @@ > # > # implementation tests are in t/db_dependent/Barcodes.t > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Barcodes_annual.t b/t/Barcodes_annual.t >index b89d207..a95d634 100755 >--- a/t/Barcodes_annual.t >+++ b/t/Barcodes_annual.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+ > > use Test::More tests => 1; > >diff --git a/t/Barcodes_hbyymmincr.t b/t/Barcodes_hbyymmincr.t >index a2377d3..58ab404 100755 >--- a/t/Barcodes_hbyymmincr.t >+++ b/t/Barcodes_hbyymmincr.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Barcodes_incremental.t b/t/Barcodes_incremental.t >index 1bde5d3..8fa0ce2 100755 >--- a/t/Barcodes_incremental.t >+++ b/t/Barcodes_incremental.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Bookseller.t b/t/Bookseller.t >index 360a0ad..06fe56c 100755 >--- a/t/Bookseller.t >+++ b/t/Bookseller.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Budgets.t b/t/Budgets.t >index 96d0af4..bd8e7d2 100755 >--- a/t/Budgets.t >+++ b/t/Budgets.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/ClassSortRoutine.t b/t/ClassSortRoutine.t >index be379a2..6bcb532 100755 >--- a/t/ClassSortRoutine.t >+++ b/t/ClassSortRoutine.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/ClassSortRoutine_Dewey.t b/t/ClassSortRoutine_Dewey.t >index 404a967..edec0c5 100755 >--- a/t/ClassSortRoutine_Dewey.t >+++ b/t/ClassSortRoutine_Dewey.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 10; > >diff --git a/t/ClassSortRoutine_Generic.t b/t/ClassSortRoutine_Generic.t >index 128006b..d1a857f 100755 >--- a/t/ClassSortRoutine_Generic.t >+++ b/t/ClassSortRoutine_Generic.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 3; > >diff --git a/t/ClassSortRoutine_LCC.t b/t/ClassSortRoutine_LCC.t >index 9ec37cf..30acd4a 100755 >--- a/t/ClassSortRoutine_LCC.t >+++ b/t/ClassSortRoutine_LCC.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 10; > >diff --git a/t/ClassSource.t b/t/ClassSource.t >index ffb3104..478d843 100755 >--- a/t/ClassSource.t >+++ b/t/ClassSource.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Contract.t b/t/Contract.t >index 87df569..24e78be 100755 >--- a/t/Contract.t >+++ b/t/Contract.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Creators.t b/t/Creators.t >index 6e825d6..6d54ccc 100755 >--- a/t/Creators.t >+++ b/t/Creators.t >@@ -10,8 +10,7 @@ > # > # sample of utf-8 text, font name and type will be on bottom of second page > >-use strict; >-use warnings; >+use Modern::Perl; > > use File::Temp qw/ tempfile /; > use Test::More tests => 41; >diff --git a/t/EdiInvoice.t b/t/EdiInvoice.t >index 14e7596..d4e19aa 100755 >--- a/t/EdiInvoice.t >+++ b/t/EdiInvoice.t >@@ -1,6 +1,5 @@ > #!/usr/bin/perl >-use strict; >-use warnings; >+use Modern::Perl; > use FindBin qw( $Bin ); > > use Test::More tests => 19; >diff --git a/t/Edifact.t b/t/Edifact.t >index cc20539..5071b25 100755 >--- a/t/Edifact.t >+++ b/t/Edifact.t >@@ -1,6 +1,5 @@ > #!/usr/bin/perl >-use strict; >-use warnings; >+use Modern::Perl; > use FindBin qw( $Bin ); > > use Test::More tests => 34; >diff --git a/t/Ediorder.t b/t/Ediorder.t >index 50926a9..1031177 100755 >--- a/t/Ediorder.t >+++ b/t/Ediorder.t >@@ -1,6 +1,5 @@ > #!/usr/bin/perl >-use strict; >-use warnings; >+use Modern::Perl; > use FindBin qw( $Bin ); > > use Test::More tests => 8; >diff --git a/t/Ediordrsp.t b/t/Ediordrsp.t >index 6d410dc..ff7a0ba 100755 >--- a/t/Ediordrsp.t >+++ b/t/Ediordrsp.t >@@ -1,6 +1,5 @@ > #!/usr/bin/perl >-use strict; >-use warnings; >+use Modern::Perl; > use FindBin qw( $Bin ); > > use Test::More tests => 16; >diff --git a/t/External/Syndetics.t b/t/External/Syndetics.t >index e335c74..db79166 100755 >--- a/t/External/Syndetics.t >+++ b/t/External/Syndetics.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Form_MessagingPreferences.t b/t/Form_MessagingPreferences.t >index 483e133..9f5f5d9 100755 >--- a/t/Form_MessagingPreferences.t >+++ b/t/Form_MessagingPreferences.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Heading.t b/t/Heading.t >index d780944..f166300 100755 >--- a/t/Heading.t >+++ b/t/Heading.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/HtmlTags.t b/t/HtmlTags.t >index 3746d2c..ec2f16b 100755 >--- a/t/HtmlTags.t >+++ b/t/HtmlTags.t >@@ -3,8 +3,7 @@ > # This module tests the HtmlTag filter > # > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 4; > >diff --git a/t/Installer_PerlDependencies.t b/t/Installer_PerlDependencies.t >index 45dc1f1..9f4709e 100755 >--- a/t/Installer_PerlDependencies.t >+++ b/t/Installer_PerlDependencies.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Installer_pm.t b/t/Installer_pm.t >index 7378172..dc1a3db 100755 >--- a/t/Installer_pm.t >+++ b/t/Installer_pm.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > # >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 4; > use Data::Dumper; >diff --git a/t/ItemCirculationAlertPreference.t b/t/ItemCirculationAlertPreference.t >index d937c26..403e02d 100755 >--- a/t/ItemCirculationAlertPreference.t >+++ b/t/ItemCirculationAlertPreference.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Koha_Util_MARC.t b/t/Koha_Util_MARC.t >index 3e205c9..4f7ecd2 100755 >--- a/t/Koha_Util_MARC.t >+++ b/t/Koha_Util_MARC.t >@@ -20,8 +20,7 @@ > # Note that at present this test is almost identical to the one testing > # the encapsulating method in Koha::MetadataRecord. > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 4; > >diff --git a/t/Labels.t b/t/Labels.t >index bd0d9ec..02e8643 100644 >--- a/t/Labels.t >+++ b/t/Labels.t >@@ -17,8 +17,7 @@ > # > # for context, see http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2691 > >-use strict; >-use warnings; >+use Modern::Perl; > > use C4::ClassSplitRoutine::LCC; > use Test::More tests => 11; >diff --git a/t/Labels_split_ccn.t b/t/Labels_split_ccn.t >index 40d1e7d..7f5417e 100755 >--- a/t/Labels_split_ccn.t >+++ b/t/Labels_split_ccn.t >@@ -17,8 +17,7 @@ > # > # for context, see http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2691 > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More; > >diff --git a/t/Labels_split_ddcn.t b/t/Labels_split_ddcn.t >index 33edba1..5850d4f 100755 >--- a/t/Labels_split_ddcn.t >+++ b/t/Labels_split_ddcn.t >@@ -17,8 +17,7 @@ > # > # for context, see http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2691 > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More; > >diff --git a/t/Labels_split_lccn.t b/t/Labels_split_lccn.t >index f9462ba..6c52df6 100755 >--- a/t/Labels_split_lccn.t >+++ b/t/Labels_split_lccn.t >@@ -17,8 +17,7 @@ > # > # for context, see http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=2691 > >-use strict; >-use warnings; >+use Modern::Perl; > > use C4::ClassSplitRoutine::LCC; > use Test::More; >diff --git a/t/Members_Attributes.t b/t/Members_Attributes.t >index 205d611..f767329 100755 >--- a/t/Members_Attributes.t >+++ b/t/Members_Attributes.t >@@ -2,8 +2,7 @@ > # > # > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 11; > >diff --git a/t/Members_Messaging.t b/t/Members_Messaging.t >index 9395008..b9e78c1 100755 >--- a/t/Members_Messaging.t >+++ b/t/Members_Messaging.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Output.t b/t/Output.t >index 279ce06..ee10293 100755 >--- a/t/Output.t >+++ b/t/Output.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 6; > use Test::Warn; >diff --git a/t/Output_JSONStream.t b/t/Output_JSONStream.t >index 13702a6..d23f672 100755 >--- a/t/Output_JSONStream.t >+++ b/t/Output_JSONStream.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 10; > >diff --git a/t/Patroncards.t b/t/Patroncards.t >index 60a7237..ec7e92c 100755 >--- a/t/Patroncards.t >+++ b/t/Patroncards.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Batch.t b/t/Patroncards_Batch.t >index a0743ff..0438150 100755 >--- a/t/Patroncards_Batch.t >+++ b/t/Patroncards_Batch.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Layout.t b/t/Patroncards_Layout.t >index fe68761..da226c3 100755 >--- a/t/Patroncards_Layout.t >+++ b/t/Patroncards_Layout.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Lib.t b/t/Patroncards_Lib.t >index 88154a6..cab6dfa 100755 >--- a/t/Patroncards_Lib.t >+++ b/t/Patroncards_Lib.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Patroncard.t b/t/Patroncards_Patroncard.t >index 8868350..701486b 100755 >--- a/t/Patroncards_Patroncard.t >+++ b/t/Patroncards_Patroncard.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Profile.t b/t/Patroncards_Profile.t >index 78cb6cf..2769518 100755 >--- a/t/Patroncards_Profile.t >+++ b/t/Patroncards_Profile.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Patroncards_Template.t b/t/Patroncards_Template.t >index a781e0c..3acbcba 100755 >--- a/t/Patroncards_Template.t >+++ b/t/Patroncards_Template.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/Print.t b/t/Print.t >index faf729d..ba8affd 100755 >--- a/t/Print.t >+++ b/t/Print.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 2; > >diff --git a/t/QueryParser.t b/t/QueryParser.t >index 7b69430..1011cee 100644 >--- a/t/QueryParser.t >+++ b/t/QueryParser.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More; > use Test::Deep; >diff --git a/t/Scheduler.t b/t/Scheduler.t >index f0f02e1..96d6083 100644 >--- a/t/Scheduler.t >+++ b/t/Scheduler.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 6; > >diff --git a/t/Scrubber.t b/t/Scrubber.t >index 9bcd003..517aa9f 100755 >--- a/t/Scrubber.t >+++ b/t/Scrubber.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > > $| = 1; > use Test::More tests => 29; >diff --git a/t/Stats.t b/t/Stats.t >index d56c2c9..844286e 100755 >--- a/t/Stats.t >+++ b/t/Stats.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/SuggestionEngine.t b/t/SuggestionEngine.t >index eed6fe8..f1b6d7f 100755 >--- a/t/SuggestionEngine.t >+++ b/t/SuggestionEngine.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > use File::Spec; > > use Test::More; >diff --git a/t/TmplToken.t b/t/TmplToken.t >index 579ee9d..dff5c99 100755 >--- a/t/TmplToken.t >+++ b/t/TmplToken.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > use C4::TmplTokenType; > use Test::More tests => 19; > >diff --git a/t/db_dependent/00-strict.t b/t/db_dependent/00-strict.t >index c91c601..ea81f20 100755 >--- a/t/db_dependent/00-strict.t >+++ b/t/db_dependent/00-strict.t >@@ -1,9 +1,7 @@ > #!/usr/bin/perl > # This script is called by the pre-commit git hook to test modules compile > >-use strict; >-use warnings; >- >+use Modern::Perl; > use threads; # used for parallel > use Test::More; > use Test::Strict; >diff --git a/t/db_dependent/Amazon.t b/t/db_dependent/Amazon.t >index 2304073..df5369d 100755 >--- a/t/db_dependent/Amazon.t >+++ b/t/db_dependent/Amazon.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 8; > use t::lib::Mocks; >diff --git a/t/db_dependent/Heading_MARC21.t b/t/db_dependent/Heading_MARC21.t >index 0e1f1c9..adff1c3 100755 >--- a/t/db_dependent/Heading_MARC21.t >+++ b/t/db_dependent/Heading_MARC21.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 3; > use C4::Context; >diff --git a/t/db_dependent/LDAP/test_ldap_add.pl b/t/db_dependent/LDAP/test_ldap_add.pl >index 1a67748..c21a5c7 100755 >--- a/t/db_dependent/LDAP/test_ldap_add.pl >+++ b/t/db_dependent/LDAP/test_ldap_add.pl >@@ -7,8 +7,7 @@ > # Then run this script to test perl interaction w/ LDAP. > # > >-use warnings; >-use strict; >+use Modern::Perl; > > use Net::LDAP; > use Net::LDAP::Filter; >diff --git a/t/db_dependent/Record/Record.t b/t/db_dependent/Record/Record.t >index 0bbfb03..5559ccc 100755 >--- a/t/db_dependent/Record/Record.t >+++ b/t/db_dependent/Record/Record.t >@@ -19,8 +19,7 @@ > # along with Koha; if not, see <http://www.gnu.org/licenses>. > # > # >-use strict; >-use warnings; >+use Modern::Perl; > > use constant WHEREAMI => 't/db_dependent/Record/testrecords'; > >diff --git a/t/db_dependent/RecordProcessor_EmbedSeeFromHeadings.t b/t/db_dependent/RecordProcessor_EmbedSeeFromHeadings.t >index 664a0fa..a5aed5e 100755 >--- a/t/db_dependent/RecordProcessor_EmbedSeeFromHeadings.t >+++ b/t/db_dependent/RecordProcessor_EmbedSeeFromHeadings.t >@@ -17,8 +17,7 @@ > # You should have received a copy of the GNU General Public License > # along with Koha; if not, see <http://www.gnu.org/licenses>. > >-use strict; >-use warnings; >+use Modern::Perl; > use File::Spec; > use MARC::Record; > use Koha::MetadataRecord::Authority; >diff --git a/t/db_dependent/Reports.t b/t/db_dependent/Reports.t >index e28efd6..a58b2ad 100755 >--- a/t/db_dependent/Reports.t >+++ b/t/db_dependent/Reports.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 2; > >diff --git a/t/db_dependent/Service.t b/t/db_dependent/Service.t >index 497cc1b..2e3b430 100755 >--- a/t/db_dependent/Service.t >+++ b/t/db_dependent/Service.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 1; > >diff --git a/t/db_dependent/SuggestionEngine_ExplodedTerms.t b/t/db_dependent/SuggestionEngine_ExplodedTerms.t >index bac1b41..2eb514b 100644 >--- a/t/db_dependent/SuggestionEngine_ExplodedTerms.t >+++ b/t/db_dependent/SuggestionEngine_ExplodedTerms.t >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > > use Cwd qw/abs_path/; > use File::Basename; >diff --git a/t/db_dependent/Tags.t b/t/db_dependent/Tags.t >index 5612d3a..90f5502 100755 >--- a/t/db_dependent/Tags.t >+++ b/t/db_dependent/Tags.t >@@ -3,8 +3,7 @@ > # This Koha test module is a stub! > # Add more tests here!!! > >-use strict; >-use warnings; >+use Modern::Perl; > > use Test::More tests => 32; > >-- >2.1.4
<b>You cannot view the attachment while viewing its details because your browser does not support IFRAMEs. <a href="attachment.cgi?id=83857">View the attachment on a separate page</a>.</b>
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 20022
:
70717
| 83857