thomas: server/kolabd/kolabd kolabquotawarn,1.3.2.7,1.3.2.8

[cvs at intevation.de]

Author: thomas

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

Modified Files:
      Tag: kolab_2_0_branch
	kolabquotawarn 
Log Message:
Backported minor/cosmetic changes from HEAD.


Index: kolabquotawarn
===================================================================
RCS file: /kolabrepository/server/kolabd/kolabd/Attic/kolabquotawarn,v
retrieving revision 1.3.2.7
retrieving revision 1.3.2.8
diff -u -d -r1.3.2.7 -r1.3.2.8
--- kolabquotawarn	11 Jan 2006 20:44:49 -0000	1.3.2.7
+++ kolabquotawarn	2 Feb 2006 16:36:35 -0000	1.3.2.8
@@ -67,7 +67,7 @@
 
   my $text = sprintf( "kolabquotawarn: $fmt", @_ );
 
-  print STDERR "$text\n";
+  #print STDERR "$text\n";
   syslog $prio, $text;
 }
 
@@ -83,7 +83,8 @@
 #
 sub fatal_exit {
     my($first) = shift(@_);
-    #printf( STDERR "fatal: $first", @_ );
+    printf( STDERR "fatal: $first", @_ );
+    printf( STDERR "\n" );
     mylog("err", "fatal: $first", @_);
     exit 1;
 }
@@ -107,7 +108,7 @@
   fatal_exit( "Can't open quotawarning.txt" );
 }
 
-dbmopen( %quotawarn_db, $prefix.'/var/kolab/quotawarn.db', 0666 ) 
+dbmopen( %quotawarn_db, $prefix.'/var/kolab/quotawarn.db', 0666 )
   || fatal_exit ('Unable to open quotawarn db');
 
 if( $opt_d ) {
@@ -192,7 +193,7 @@
 
 ### Connect to Cyrus
 my $cyrus = Cyrus::IMAP::Admin->new('localhost');
-$cyrus || fatal_exit( 'Unable to connect to local Cyrus admin interface\n' );
+$cyrus || fatal_exit( 'Unable to connect to local Cyrus admin interface' );
 $cyrus->authenticate(
 					 'User'          => $Kolab::config{'cyrus_admin'},
 					 'Password'      => $Kolab::config{'cyrus_admin_pw'},