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.10 -r1.11 --- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl 9 Jan 2008 12:45:24 -0000 1.10 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-init.tcl 29 May 2008 14:59:43 -0000 1.11 @@ -13,7 +13,10 @@ set queue_dir [parameter::get_from_package_key -parameter "BounceMailDir" -package_key "acs-mail-lite"] -# ad_schedule_proc -thread t 120 acs_mail_lite::load_mails -queue_dir $queue_dir +if {$queue_dir ne ""} { + # if BounceMailDir is set then handle incoming mail + 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