From 9e5e95a03b1511a5e2afc591f13f6169bf7dc6ba Mon Sep 17 00:00:00 2001 From: opensides Date: Sun, 28 Mar 2010 00:05:36 +0000 Subject: [PATCH] - Corrected open perl function, corrected variable passing to open and close git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@17329 594d385d-05f5-0310-b6e9-bd551577e9d8 --- gosa-si/server/events/server_server_com.pm | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/gosa-si/server/events/server_server_com.pm b/gosa-si/server/events/server_server_com.pm index b13762622..6a73b0777 100644 --- a/gosa-si/server/events/server_server_com.pm +++ b/gosa-si/server/events/server_server_com.pm @@ -1,5 +1,14 @@ package server_server_com; + +use strict; +use warnings; + use Exporter; +use Data::Dumper; +use GOSA::GosaSupportDaemon; +use Time::HiRes qw( usleep); +use Socket; + @ISA = qw(Exporter); my @events = ( 'information_sharing', @@ -12,14 +21,6 @@ my @events = ( ); @EXPORT = @events; -use strict; -use warnings; -use Data::Dumper; -use GOSA::GosaSupportDaemon; -use Time::HiRes qw( usleep); -use Socket; - - BEGIN {} END {} -- 2.30.2