thomas: server/kolabd/kolabd kolabquotawarn,1.3.2.7,1.3.2.8
cvs at intevation.de
cvs at intevation.de
Thu Feb 2 17:36:37 CET 2006
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'},
More information about the commits
mailing list