Bugzilla – Attachment 71189 Details for
Bug 20010
use Modern::Perl in Patroncards perl scripts
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 20010: use Modern::Perl in Patroncards perl scripts
Bug-20010-use-ModernPerl-in-Patroncards-perl-scrip.patch (text/plain), 4.46 KB, created by
Katrin Fischer
on 2018-02-04 13:33:26 UTC
(
hide
)
Description:
Bug 20010: use Modern::Perl in Patroncards perl scripts
Filename:
MIME Type:
Creator:
Katrin Fischer
Created:
2018-02-04 13:33:26 UTC
Size:
4.46 KB
patch
obsolete
>From 03dce4b99a49cfc8ee2bcfea4b95e001ffd789c7 Mon Sep 17 00:00:00 2001 >From: Grace Smyth <gracesmythh@gmail.com> >Date: Thu, 18 Jan 2018 03:58:42 +0000 >Subject: [PATCH] Bug 20010: use Modern::Perl in Patroncards perl scripts > >Test Plan: >Check the following files have been updated from >use strict; >use warnings; >to >use Modern::Perl; > >create-pdf.pl >edit-batch.pl >edit-layout.pl >edit-profile.pl >edit-template.pl >home.pl >image-manage.pl >manage.pl >print.pl > >Signed-off-by: Jon Knight <J.P.Knight@lboro.ac.uk> > >Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> >--- > patroncards/create-pdf.pl | 4 +--- > patroncards/edit-batch.pl | 4 ++-- > patroncards/edit-layout.pl | 3 +-- > patroncards/edit-profile.pl | 3 +-- > patroncards/edit-template.pl | 3 +-- > patroncards/home.pl | 3 +-- > patroncards/image-manage.pl | 3 +-- > patroncards/manage.pl | 3 +-- > patroncards/print.pl | 3 +-- > 9 files changed, 10 insertions(+), 19 deletions(-) > >diff --git a/patroncards/create-pdf.pl b/patroncards/create-pdf.pl >index 6f22049a74..3bd28ba79f 100755 >--- a/patroncards/create-pdf.pl >+++ b/patroncards/create-pdf.pl >@@ -17,9 +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 C4::Auth; > use Graphics::Magick; >diff --git a/patroncards/edit-batch.pl b/patroncards/edit-batch.pl >index 56410079ae..bd06aabb65 100755 >--- a/patroncards/edit-batch.pl >+++ b/patroncards/edit-batch.pl >@@ -18,8 +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 strict; >-use warnings; >+ >+use Modern::Perl; > use vars qw($debug); > > use CGI qw ( -utf8 ); >diff --git a/patroncards/edit-layout.pl b/patroncards/edit-layout.pl >index d2446403b9..3c7612992d 100755 >--- a/patroncards/edit-layout.pl >+++ b/patroncards/edit-layout.pl >@@ -18,8 +18,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 Text::CSV_XS; >diff --git a/patroncards/edit-profile.pl b/patroncards/edit-profile.pl >index 4b0769c0e3..d84fb19b13 100755 >--- a/patroncards/edit-profile.pl >+++ b/patroncards/edit-profile.pl >@@ -18,8 +18,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 ); > >diff --git a/patroncards/edit-template.pl b/patroncards/edit-template.pl >index f37757c540..3712a6fd82 100755 >--- a/patroncards/edit-template.pl >+++ b/patroncards/edit-template.pl >@@ -18,8 +18,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 autouse 'Data::Dumper' => qw(Dumper); >diff --git a/patroncards/home.pl b/patroncards/home.pl >index b88221f337..cb8e7a5b06 100755 >--- a/patroncards/home.pl >+++ b/patroncards/home.pl >@@ -18,8 +18,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 ); > >diff --git a/patroncards/image-manage.pl b/patroncards/image-manage.pl >index 514ea942c1..2c08123427 100755 >--- a/patroncards/image-manage.pl >+++ b/patroncards/image-manage.pl >@@ -1,7 +1,6 @@ > #!/usr/bin/perl > >-use warnings; >-use strict; >+use Modern::Perl; > > use CGI qw ( -utf8 ); > use Graphics::Magick; >diff --git a/patroncards/manage.pl b/patroncards/manage.pl >index 837fccdf76..96f8158e0d 100755 >--- a/patroncards/manage.pl >+++ b/patroncards/manage.pl >@@ -18,8 +18,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 vars qw($debug); > > use CGI qw ( -utf8 ); >diff --git a/patroncards/print.pl b/patroncards/print.pl >index c57be1d25c..8992038fec 100755 >--- a/patroncards/print.pl >+++ b/patroncards/print.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 autouse 'Data::Dumper' => qw(Dumper); >-- >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 20010
:
70680
|
70888
|
70891
| 71189