steffen: server/kolabd/kolabd kolabquotawarn,1.3.2.4,1.3.2.5

[cvs at intevation.de]

Author: steffen

Update of /kolabrepository/server/kolabd/kolabd
In directory doto:/tmp/cvs-serv29801/kolabd

Modified Files:
      Tag: kolab_2_0_branch
	kolabquotawarn 
Log Message:
Fix for Issue921 (uninitialised warnpct in quotawarn)

Index: kolabquotawarn
===================================================================
RCS file: /kolabrepository/server/kolabd/kolabd/Attic/kolabquotawarn,v
retrieving revision 1.3.2.4
retrieving revision 1.3.2.5
diff -u -d -r1.3.2.4 -r1.3.2.5
--- kolabquotawarn	15 Sep 2005 10:47:10 -0000	1.3.2.4
+++ kolabquotawarn	30 Sep 2005 12:42:34 -0000	1.3.2.5
@@ -67,7 +67,7 @@
 
   my $text = sprintf( "kolabquotawarn: $fmt", @_ );
 
-  #print STDERR "$text\n";
+  print STDERR "$text\n";
   syslog $prio, $text;
 }
 
@@ -93,6 +93,10 @@
 my $warninterval = 60*60*24; # seconds between warnings
 my $warnmessage = '';
 my $quotawarnpct = $Kolab::config{'cyrus-quotawarn'};
+fatal_exit( "Can't read configuration, please make sure that kolabquotawarn runs with sufficient privileges")
+  unless $quotawarnpct
+  && $Kolab::config{'cyrus_admin'}
+  && $Kolab::config{'cyrus_admin_pw'};
 my %quotawarn_db;
 my $warnh = new IO::File "< $prefix/etc/kolab/quotawarning.txt";
 if( defined($warnh) ) {