From 539ce8253c25576902d751ec836c75d6943d6ba1 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 Content-Type: text/plain; charset=utf-8 Removed tabs and used spaces consistently Used 'use base' to remove unnecessary BEGIN sub and explicit setting of ISA at application level --- C4/SIP/Sip.pm | 31 +++++++++++++------------------ 1 file changed, 13 insertions(+), 18 deletions(-) diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm index ec549e6..15bb9a3 100644 --- a/C4/SIP/Sip.pm +++ b/C4/SIP/Sip.pm @@ -16,24 +16,19 @@ use IO::Handle; use C4::SIP::Sip::Constants qw(SIP_DATETIME FID_SCREEN_MSG); use C4::SIP::Sip::Checksum qw(checksum); -use vars qw(@ISA @EXPORT_OK %EXPORT_TAGS); - -BEGIN { - @ISA = qw(Exporter); - - @EXPORT_OK = qw(y_or_n timestamp add_field maybe_add add_count - denied sipbool boolspace write_msg get_timeout - $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 - get_timeout - $error_detection $protocol_version - $field_delimiter $last_response)]); -} - +use base qw(Exporter); + +our @EXPORT_OK = qw(y_or_n timestamp add_field maybe_add add_count + denied sipbool boolspace write_msg get_timeout + $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 + get_timeout + $error_detection $protocol_version + $field_delimiter $last_response)]); our $error_detection = 0; our $protocol_version = 1; -- 1.7.10.4