From 18bca6f9202ce2f940f0e7ca8e6e7fb4d42ef330 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 Signed-off-by: Srdjan Signed-off-by: Marcel de Rooy --- C4/SIP/Sip.pm | 28 ++++++++++++---------------- 1 file changed, 12 insertions(+), 16 deletions(-) diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm index 52eda1f..3f41226 100644 --- a/C4/SIP/Sip.pm +++ b/C4/SIP/Sip.pm @@ -16,22 +16,18 @@ 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 - $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 @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; -- 1.7.10.4