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.6.1 -r1.4.6.2 --- openacs-4/packages/notifications/tcl/reply-sweep-init.tcl 28 Sep 2005 18:22:01 -0000 1.4.6.1 +++ openacs-4/packages/notifications/tcl/reply-sweep-init.tcl 28 Sep 2005 18:24:38 -0000 1.4.6.2 @@ -10,11 +10,11 @@ # Roberto Mello (12/2002): Added parameter and check for qmail queue scanning -#set scan_replies_p [parameter::get \ +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 +}