Attachment 71192 Details for Bug 19998 – Bug 19998: use Modern::Perl in error perl scripts

[patch] Bug 19998: use Modern::Perl in error perl scripts

Bug-19998-use-ModernPerl-in-error-perl-scripts.patch (text/plain), 2.53 KB, created by Katrin Fischer on 2018-02-04 14:10:08 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Katrin Fischer

Created: 2018-02-04 14:10:08 UTC

Size: 2.53 KB

patch

obsolete

>From 877911da4700f2e50b8faba9d85b264b1559c428 Mon Sep 17 00:00:00 2001
>From: Te Rauhina Jackson <terauhina.jackson@gmail.com>
>Date: Thu, 18 Jan 2018 03:14:44 +0000
>Subject: [PATCH] Bug 19998: use Modern::Perl in error perl scripts
>
>Test Plan:
>Check the following files have been updated from
>use strict;
>use warnings;
>to
>use Modern::Perl;
>
>400.pl
>401.pl
>402.pl
>403.pl
>404.pl
>500.pl
>
>Signed-off-by: Jon Knight <J.P.Knight@lboro.ac.uk>
>
>Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
>---
> errors/400.pl | 3 +--
> errors/401.pl | 3 +--
> errors/402.pl | 3 +--
> errors/403.pl | 3 +--
> errors/404.pl | 3 +--
> errors/500.pl | 3 +--
> 6 files changed, 6 insertions(+), 12 deletions(-)
>
>diff --git a/errors/400.pl b/errors/400.pl
>index 7c947dbf29..2bfe3b80e5 100755
>--- a/errors/400.pl
>+++ b/errors/400.pl
>@@ -16,8 +16,7 @@
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>diff --git a/errors/401.pl b/errors/401.pl
>index fcd2d88b16..52c74c2f09 100755
>--- a/errors/401.pl
>+++ b/errors/401.pl
>@@ -15,8 +15,7 @@
> # Koha; if not, write to the Free Software Foundation, Inc.,
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>diff --git a/errors/402.pl b/errors/402.pl
>index 1a9f3a6876..b9431c4ef1 100755
>--- a/errors/402.pl
>+++ b/errors/402.pl
>@@ -16,8 +16,7 @@
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>diff --git a/errors/403.pl b/errors/403.pl
>index 3a46f68a2f..78f4f08aa2 100755
>--- a/errors/403.pl
>+++ b/errors/403.pl
>@@ -16,8 +16,7 @@
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>diff --git a/errors/404.pl b/errors/404.pl
>index 57191f1600..e5870ad83f 100755
>--- a/errors/404.pl
>+++ b/errors/404.pl
>@@ -16,8 +16,7 @@
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>diff --git a/errors/500.pl b/errors/500.pl
>index 0008faf5c5..f3f73bac10 100755
>--- a/errors/500.pl
>+++ b/errors/500.pl
>@@ -16,8 +16,7 @@
> # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
> 
> 
>-use strict;
>-use warnings;
>+use Modern::Perl;
> use CGI qw ( -utf8 );
> use C4::Auth;
> use C4::Output;
>-- 
>2.14.1

Actions: View | Diff | Splinter Review

Attachments on bug 19998: 70670 | 70886 | 70893 | 71192