From 68cdeccfe71917370c3dbee01103c6cf761799ee Mon Sep 17 00:00:00 2001
From: Joe Atzberger <joe.atzberger@liblime.com>
Date: Mon, 7 Jan 2008 13:53:09 -0600
Subject: [PATCH] SIPServer.pm - BEGIN block VERSION and vars related to
 export.

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/SIP/SIPServer.pm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/C4/SIP/SIPServer.pm b/C4/SIP/SIPServer.pm
index 987daa7378..15364b03bf 100644
--- a/C4/SIP/SIPServer.pm
+++ b/C4/SIP/SIPServer.pm
@@ -18,7 +18,13 @@ use Sip::MsgType;
 
 use constant LOG_SIP => "local6"; # Local alias for the logging facility
 
-our @ISA = qw(Net::Server::PreFork);
+use vars qw(@ISA $VERSION);
+
+BEGIN {
+	$VERSION = 1.00;
+	@ISA = qw(Net::Server::PreFork);
+}
+
 #
 # Main
 #
@@ -268,3 +274,6 @@ sub sip_protocol_loop {
 	$expect = '';
     }
 }
+
+1;
+__END__
-- 
2.39.5