gunnar: server/perl-kolab/bin kolabquotareport.in, 1.1, 1.2 kolabquotawarn.in, 1.1, 1.2

[cvs at kolab.org]

Author: gunnar

Update of /kolabrepository/server/perl-kolab/bin
In directory doto:/tmp/cvs-serv8061/bin

Modified Files:
	kolabquotareport.in kolabquotawarn.in 
Log Message:
Fixed variable handling and replaced a hardcoded path.

Index: kolabquotareport.in
===================================================================
RCS file: /kolabrepository/server/perl-kolab/bin/kolabquotareport.in,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- kolabquotareport.in	10 Oct 2008 14:22:04 -0000	1.1
+++ kolabquotareport.in	8 Nov 2008 10:03:06 -0000	1.2
@@ -41,7 +41,7 @@
 
 Kolab::reloadConfig("@CONFIG_DIR@/kolab.globals");
 
-Kolab::LDAP::startup($conf{'kolab_statedir'});
+Kolab::LDAP::startup($Kolab::config{'kolab_statedir'});
 
 getopts('d');
 if ($opt_d) {

Index: kolabquotawarn.in
===================================================================
RCS file: /kolabrepository/server/perl-kolab/bin/kolabquotawarn.in,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- kolabquotawarn.in	10 Oct 2008 14:22:04 -0000	1.1
+++ kolabquotawarn.in	8 Nov 2008 10:03:06 -0000	1.2
@@ -100,7 +100,7 @@
   && $Kolab::config{'cyrus_admin'}
   && $Kolab::config{'cyrus_admin_pw'};
 my %quotawarn_db;
-my $warnh = new IO::File "< @CONFIG_DIR@/quotawarning.txt";
+my $warnh = new IO::File "< $Kolab::config{'kolab_quotawarning'}/";
 if( defined($warnh) ) {
   $warnmessage = join( '', $warnh->getlines );
   $warnmessage =~ s/<admin>/MAILER-DAEMON/g;