Index: openacs-4/packages/notifications/tcl/sweep-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/sweep-init.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/notifications/tcl/sweep-init.tcl	1 Jul 2002 19:35:30 -0000	1.2
+++ openacs-4/packages/notifications/tcl/sweep-init.tcl	2 Jul 2002 19:55:49 -0000	1.3
@@ -20,5 +20,9 @@
         set batched_p 0
     } 
 
-    ad_schedule_proc -thread t $n_seconds notification::sweep::sweep_notifications -interval_id [lindex $interval 1] -batched_p $batched_p
+    if {$n_seconds > 0} {
+        ad_schedule_proc -thread t $n_seconds notification::sweep::sweep_notifications -interval_id [lindex $interval 1] -batched_p $batched_p
+    } else {
+        ad_schedule_proc -thread t 60 notification::sweep::sweep_notifications -interval_id [lindex $interval 1] -batched_p $batched_p
+    }        
 }