From b3786fb159f669b10e5d37e06d8f8177b9a12eab Mon Sep 17 00:00:00 2001 From: Colin Campbell Date: Wed, 6 Jul 2016 15:25:21 +0100 Subject: [PATCH] Bug 15006 Correct indentation of EXPORTs in Sip.pm MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Removed tabs and used spaces consistently Used 'use base' to remove unnecessary BEGIN sub and explicit setting of ISA at application level Signed-off-by: Srdjan Signed-off-by: Marcel de Rooy Signed-off-by: Kyle M Hall (cherry picked from commit 4ad4ab6396af26bed9dceb442adf4aad6687f362) Signed-off-by: Frédéric Demians (cherry picked from commit ad235daaa74193947a328f96ed35d43aa0ec6663) Signed-off-by: Julian Maurice --- C4/SIP/Sip.pm | 31 ++++++++++++++----------------- 1 file changed, 14 insertions(+), 17 deletions(-) diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm index b811590f0e..32c93d0460 100644 --- a/C4/SIP/Sip.pm +++ b/C4/SIP/Sip.pm @@ -16,23 +16,20 @@ use IO::Handle; use C4::SIP::Sip::Constants qw(SIP_DATETIME FID_SCREEN_MSG); use C4::SIP::Sip::Checksum qw(checksum); -use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS); - -BEGIN { - $VERSION = 3.07.00.049; - @ISA = qw(Exporter); - - @EXPORT_OK = qw(y_or_n timestamp add_field maybe_add add_count - denied sipbool boolspace write_msg - $error_detection $protocol_version $field_delimiter - $last_response); - - %EXPORT_TAGS = ( - all => [qw(y_or_n timestamp add_field maybe_add - add_count denied sipbool boolspace write_msg - $error_detection $protocol_version - $field_delimiter $last_response)]); -} +use base qw(Exporter); + +our $VERSION = 3.07.00.049; + +our @EXPORT_OK = qw(y_or_n timestamp add_field maybe_add add_count + denied sipbool boolspace write_msg + $error_detection $protocol_version $field_delimiter + $last_response); + +our %EXPORT_TAGS = ( + all => [qw(y_or_n timestamp add_field maybe_add + add_count denied sipbool boolspace write_msg + $error_detection $protocol_version + $field_delimiter $last_response)]); our $error_detection = 0; our $protocol_version = 1; -- 2.39.5