Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl	12 Mar 2006 14:33:22 -0000	1.5
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl	8 Jun 2006 07:12:03 -0000	1.6
@@ -11,8 +11,10 @@
 # Default interval is 1 minute.
 ad_schedule_proc -thread t 60 acs_mail_lite::sweeper
 
-ad_schedule_proc -thread t 120 acs_mail_lite::load_mails -queue_dir "/home/malte/mail"
+set queue_dir [parameter::get_from_package_key -paramater "BounceMailDir" -package_key "acs-mail-lite"]
 
+ad_schedule_proc -thread t 120 acs_mail_lite::load_mails -queue_dir $queue_dir
+
 # check every few minutes for bounces
 #ad_schedule_proc -thread t [acs_mail_lite::get_parameter -name BounceScanQueue -default 120] acs_mail_lite::scan_replies