Index: openacs-4/packages/notifications/tcl/reply-sweep-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/reply-sweep-init.tcl,v diff -u -r1.4 -r1.4.6.1 --- openacs-4/packages/notifications/tcl/reply-sweep-init.tcl 11 Dec 2003 21:40:09 -0000 1.4 +++ openacs-4/packages/notifications/tcl/reply-sweep-init.tcl 28 Sep 2005 18:22:01 -0000 1.4.6.1 @@ -10,11 +10,11 @@ # Roberto Mello (12/2002): Added parameter and check for qmail queue scanning -set scan_replies_p [parameter::get \ - -package_id [apm_package_id_from_key notifications] \ - -parameter EmailQmailQueueScanP -default 0] +#set scan_replies_p [parameter::get \ + -package_id [apm_package_id_from_key notifications] \ + -parameter EmailQmailQueueScanP -default 0] -if { $scan_replies_p == 1 } { - ad_schedule_proc -thread t 60 notification::reply::sweep::scan_all_replies - ad_schedule_proc -thread t 60 notification::reply::sweep::process_all_replies -} +#if { $scan_replies_p == 1 } { +# ad_schedule_proc -thread t 60 notification::reply::sweep::scan_all_replies +# ad_schedule_proc -thread t 60 notification::reply::sweep::process_all_replies +#}