From: opensides <opensides@594d385d-05f5-0310-b6e9-bd551577e9d8>
Date: Sun, 28 Mar 2010 00:02:49 +0000 (+0000)
Subject: - Corrected open perl function, corrected variable passing to open and close
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=2f2db352524b75565fa145d75cdc32531f46fab8;p=gosa.git

- Corrected open perl function, corrected variable passing to open and close



git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@17327 594d385d-05f5-0310-b6e9-bd551577e9d8
---

diff --git a/gosa-si/server/events/mailqueue_com.pm b/gosa-si/server/events/mailqueue_com.pm
index d464db371..d788716a1 100644
--- a/gosa-si/server/events/mailqueue_com.pm
+++ b/gosa-si/server/events/mailqueue_com.pm
@@ -21,22 +21,23 @@ be automatically imported by GOsa-SI if it is under F</usr/lib/gosa-si/server/E<
 =cut
 
 package mailqueue_com;
-use Exporter;
-@ISA = qw(Exporter);
-my @events = (
-    "get_events",
-    "mailqueue_query",
-    "mailqueue_header",
-);
-@EXPORT = @events;
 
 use strict;
 use warnings;
+
+use Exporter;
 use GOSA::GosaSupportDaemon;
 use Data::Dumper;
 use Time::HiRes qw( usleep);
 use MIME::Base64;
 
+@ISA = qw(Exporter);
+my @events = (
+    "get_events",
+    "mailqueue_query",
+    "mailqueue_header",
+);
+@EXPORT = @events;
 
 BEGIN {}