From 7e7b3731dc17b437b78b12fc7e321affa1d80b94 Mon Sep 17 00:00:00 2001
From: Colin Campbell <colin.campbell@ptfs-europe.com>
Date: Thu, 12 Jul 2012 17:11:14 +0100
Subject: [PATCH] Bug 8433 Remove unused 'use English'

Adding a use English to mosules which dont may
waste a few CPU cycles and bytes of storage
but doesnt add anything to the sum of human happiness

Remove unnecessary use English's
Removed already commented out but equally unnrcessary
use Exporter in same modules

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
---
 C4/SIP/Sip.pm                           | 1 -
 C4/SIP/Sip/Configuration.pm             | 1 -
 C4/SIP/Sip/Configuration/Account.pm     | 2 --
 C4/SIP/Sip/Configuration/Institution.pm | 2 --
 C4/SIP/Sip/Configuration/Service.pm     | 2 --
 5 files changed, 8 deletions(-)

diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm
index 8807df6d6d..7a3d257926 100644
--- a/C4/SIP/Sip.pm
+++ b/C4/SIP/Sip.pm
@@ -6,7 +6,6 @@ package Sip;
 
 use strict;
 use warnings;
-use English;
 use Exporter;
 use Readonly;
 
diff --git a/C4/SIP/Sip/Configuration.pm b/C4/SIP/Sip/Configuration.pm
index 662e24cfc7..9a281dd87a 100644
--- a/C4/SIP/Sip/Configuration.pm
+++ b/C4/SIP/Sip/Configuration.pm
@@ -7,7 +7,6 @@
 package Sip::Configuration;
 
 use strict;
-use English;
 use warnings;
 use XML::Simple qw(:strict);
 
diff --git a/C4/SIP/Sip/Configuration/Account.pm b/C4/SIP/Sip/Configuration/Account.pm
index 7b3d03e7b0..1867a4c358 100644
--- a/C4/SIP/Sip/Configuration/Account.pm
+++ b/C4/SIP/Sip/Configuration/Account.pm
@@ -7,8 +7,6 @@ package Sip::Configuration::Account;
 
 use strict;
 use warnings;
-use English;
-# use Exporter;
 
 sub new {
     my ($class, $obj) = @_;
diff --git a/C4/SIP/Sip/Configuration/Institution.pm b/C4/SIP/Sip/Configuration/Institution.pm
index 1e50af2082..cd2c80c053 100644
--- a/C4/SIP/Sip/Configuration/Institution.pm
+++ b/C4/SIP/Sip/Configuration/Institution.pm
@@ -7,8 +7,6 @@ package Sip::Configuration::Institution;
 
 use strict;
 use warnings;
-use English;
-# use Exporter;
 
 sub new {
     my ($class, $obj) = @_;
diff --git a/C4/SIP/Sip/Configuration/Service.pm b/C4/SIP/Sip/Configuration/Service.pm
index b5e37e8938..34a02b1d3c 100644
--- a/C4/SIP/Sip/Configuration/Service.pm
+++ b/C4/SIP/Sip/Configuration/Service.pm
@@ -7,8 +7,6 @@ package Sip::Configuration::Service;
 
 use strict;
 use warnings;
-use English;
-# use Exporter;
 
 sub new {
     my ($class, $obj) = @_;
-- 
2.39.5