Bugzilla – Attachment 71180 Details for
Bug 20019
use Modern::Perl in miscellaneous perl scripts
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 20019: use Modern::Perl in misc perl scripts
Bug-20019-use-ModernPerl-in-misc-perl-scripts.patch (text/plain), 7.34 KB, created by
Katrin Fischer
on 2018-02-04 13:09:46 UTC
(
hide
)
Description:
Bug 20019: use Modern::Perl in misc perl scripts
Filename:
MIME Type:
Creator:
Katrin Fischer
Created:
2018-02-04 13:09:46 UTC
Size:
7.34 KB
patch
obsolete
>From 9a645c339332200778d2d7716cbab7a444974d6f Mon Sep 17 00:00:00 2001 >From: Te Rauhina Jackson <terauhina.jackson@gmail.com> >Date: Thu, 18 Jan 2018 20:41:33 +0000 >Subject: [PATCH] Bug 20019: use Modern::Perl in misc perl scripts > >Test Plan: >Test Plan: >Check the following files have been updated from >use strict; >use warnings; >to >use Modern::Perl; > >services/itemrecorddisplay.pl >suggestion/suggestion.pl >tags/list.pl >tags/review.pl >virtualshelves/sendshelf.pl >help.pl >changelanguage.pl >koha_perl_deps.pl >debian/bd-to-depends >debian/build-git-snapshot >debian/list-deps >docs/CAS/CASProxy/examples/koha_webservice.pl >docs/CAS/CASProxy/examples/proxy_cas.pl >docs/CAS/CASProxy/examples/proxy_cas_callback.pl >docs/CAS/CASProxy/examples/proxy_cas_data.pl > >Signed-off-by: Jon Knight <J.P.Knight@lboro.ac.uk> > >Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> >--- > changelanguage.pl | 3 +-- > debian/bd-to-depends | 3 +-- > debian/build-git-snapshot | 3 +-- > debian/list-deps | 3 +-- > docs/CAS/CASProxy/examples/koha_webservice.pl | 3 +-- > docs/CAS/CASProxy/examples/proxy_cas.pl | 3 +-- > docs/CAS/CASProxy/examples/proxy_cas_callback.pl | 3 +-- > docs/CAS/CASProxy/examples/proxy_cas_data.pl | 3 +-- > help.pl | 3 +-- > koha_perl_deps.pl | 3 +-- > services/itemrecorddisplay.pl | 3 +-- > suggestion/suggestion.pl | 3 +-- > tags/list.pl | 3 +-- > tags/review.pl | 3 +-- > virtualshelves/sendshelf.pl | 3 +-- > 15 files changed, 15 insertions(+), 30 deletions(-) > >diff --git a/changelanguage.pl b/changelanguage.pl >index 360484c5fa..3463c60645 100755 >--- a/changelanguage.pl >+++ b/changelanguage.pl >@@ -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 C4::Templates; > use CGI qw ( -utf8 ); >diff --git a/debian/bd-to-depends b/debian/bd-to-depends >index cff8b24446..5bc755b987 100755 >--- a/debian/bd-to-depends >+++ b/debian/bd-to-depends >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use strict; >-use warnings; >+use Modern::Perl; > > my @exclusions = ( > 'debhelper', >diff --git a/debian/build-git-snapshot b/debian/build-git-snapshot >index 260816daac..0ae2197355 100755 >--- a/debian/build-git-snapshot >+++ b/debian/build-git-snapshot >@@ -21,8 +21,7 @@ > # Srdjan Jankovic <srdjan@catalyst.net.nz> > # Based on an sh version by Lars Wirzenius. > >-use strict; >-use warnings; >+use Modern::Perl; > > use Getopt::Long; > use POSIX qw/strftime/; >diff --git a/debian/list-deps b/debian/list-deps >index cba49c6121..d599df855d 100755 >--- a/debian/list-deps >+++ b/debian/list-deps >@@ -17,8 +17,7 @@ > # You should have received a copy of the GNU General Public License > # along with this program. If not, see <http://www.gnu.org/licenses/>. > >-use strict; >-use warnings; >+use Modern::Perl; > > use C4::Installer::PerlDependencies; > >diff --git a/docs/CAS/CASProxy/examples/koha_webservice.pl b/docs/CAS/CASProxy/examples/koha_webservice.pl >index 1fc33ba680..dbaa19ef2e 100755 >--- a/docs/CAS/CASProxy/examples/koha_webservice.pl >+++ b/docs/CAS/CASProxy/examples/koha_webservice.pl >@@ -32,8 +32,7 @@ The Proxy Ticket, needed for check_api_auth, that will try to make the CAS Serve > =cut > > use utf8; >-use strict; >-use warnings; >+use Modern::Perl; > binmode(STDOUT, ":utf8"); > > use C4::Auth qw(check_api_auth); >diff --git a/docs/CAS/CASProxy/examples/proxy_cas.pl b/docs/CAS/CASProxy/examples/proxy_cas.pl >index 407892b4cf..2db8d93f8d 100755 >--- a/docs/CAS/CASProxy/examples/proxy_cas.pl >+++ b/docs/CAS/CASProxy/examples/proxy_cas.pl >@@ -28,8 +28,7 @@ > > =cut > >-use strict; >-use warnings; >+use Modern::Perl; > use CGI qw ( -utf8 ); > use Authen::CAS::Client; > >diff --git a/docs/CAS/CASProxy/examples/proxy_cas_callback.pl b/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >index 52e58e2990..4ee46b5c2d 100755 >--- a/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >+++ b/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >@@ -25,8 +25,7 @@ > > =cut > >-use strict; >-use warnings; >+use Modern::Perl; > use CGI qw ( -utf8 ); > use Authen::CAS::Client; > use Storable qw(nstore_fd); >diff --git a/docs/CAS/CASProxy/examples/proxy_cas_data.pl b/docs/CAS/CASProxy/examples/proxy_cas_data.pl >index ba4a138fcd..a333f89faa 100755 >--- a/docs/CAS/CASProxy/examples/proxy_cas_data.pl >+++ b/docs/CAS/CASProxy/examples/proxy_cas_data.pl >@@ -30,8 +30,7 @@ This PGTIOU will allow us to retrive the matching PGTID > > =cut > >-use strict; >-use warnings; >+use Modern::Perl; > use CGI qw ( -utf8 ); > use Authen::CAS::Client; > use Storable qw(fd_retrieve); >diff --git a/help.pl b/help.pl >index ad86a2da29..d549c231fe 100755 >--- a/help.pl >+++ b/help.pl >@@ -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 C4::Templates; > use C4::Output; > # use C4::Auth; >diff --git a/koha_perl_deps.pl b/koha_perl_deps.pl >index 9ca2a14cdb..cf686324fa 100755 >--- a/koha_perl_deps.pl >+++ b/koha_perl_deps.pl >@@ -9,8 +9,7 @@ use lib $FindBin::Bin; > > use C4::Installer::PerlModules; > >-use strict; >-use warnings; >+use Modern::Perl; > > my $help = 0; > my $missing = 0; >diff --git a/services/itemrecorddisplay.pl b/services/itemrecorddisplay.pl >index f4bb384e5a..2c2832f955 100755 >--- a/services/itemrecorddisplay.pl >+++ b/services/itemrecorddisplay.pl >@@ -27,8 +27,7 @@ It uses PrepareItemrecordDisplay > > =cut > >-use strict; >-use warnings; >+use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth; >diff --git a/suggestion/suggestion.pl b/suggestion/suggestion.pl >index 94e6eabd44..98fcca4914 100755 >--- a/suggestion/suggestion.pl >+++ b/suggestion/suggestion.pl >@@ -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; FIXME - Bug 2505 >+use Modern::Perl; > require Exporter; > use CGI qw ( -utf8 ); > use C4::Auth; # get_template_and_user >diff --git a/tags/list.pl b/tags/list.pl >index 9e90670637..862327862f 100755 >--- a/tags/list.pl >+++ b/tags/list.pl >@@ -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 warnings; >-use strict; >+use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw(:DEFAULT check_cookie_auth); >diff --git a/tags/review.pl b/tags/review.pl >index f1484f1a87..353e741994 100755 >--- a/tags/review.pl >+++ b/tags/review.pl >@@ -19,8 +19,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 warnings; >-use strict; >+use Modern::Perl; > use Data::Dumper; > use POSIX; > use CGI qw ( -utf8 ); >diff --git a/virtualshelves/sendshelf.pl b/virtualshelves/sendshelf.pl >index 9880efd680..996c2f71cc 100755 >--- a/virtualshelves/sendshelf.pl >+++ b/virtualshelves/sendshelf.pl >@@ -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 CGI qw ( -utf8 ); > use Encode qw( encode ); >-- >2.14.1
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 20019
:
70712
|
70902
| 71180