@@ -109,25 +109,27 @@
 						   (file-modification-time monitordbpath))))
 			 ;; do stuff here when the db is updated by some other process
 			 (if (> modtime lastmodtime)
 			     (let ((tlst (tasks:get-tasks tdb '() '()))
 				   (mlst (tasks:get-monitors tdb)))
-			       (set! tasksdat tlst)
-			       (set! monitorsdat mlst)
-			       (iup:attribute-set! monitors "VALUE" (tasks:monitors->text-table mlst))
-			       (iup:attribute-set! actions  "VALUE" (tasks:tasks->text tlst))
-			       (tasks:process-queue db tdb)
+			       ;; (set! tasksdat tlst)
+			       ;; (set! monitorsdat mlst)
+			       ;; (iup:attribute-set! monitors "VALUE" (tasks:monitors->text-table mlst))
+			       ;; (iup:attribute-set! actions  "VALUE" (tasks:tasks->text tlst))
+			       ;; (tasks:process-queue db tdb)
 			       (set! lastmodtime (max (file-modification-time megatestdbpath)
-						      (file-modification-time monitordbpath)))
-			       (tasks:reset-stuck-tasks tdb)))
+			         		      (file-modification-time monitordbpath)))
+			       ;; (tasks:reset-stuck-tasks tdb)))
+			       ))
 			 ;; stuff to do every 10 seconds
 			 (if (> (current-seconds) next-touch)
 			     (begin
 			       ;; (tasks:process-queue db tdb monitordbpath)
-			       (tasks:monitors-update tdb)
-			       (tasks:reset-stuck-tasks tdb)
-			       (set! monitorsdat (tasks:get-monitors tdb))
+			       ;; (tasks:monitors-update tdb)
+			       ;; (tasks:reset-stuck-tasks tdb)
+			       (set! monitorsdat (tasks:get-monitors tdb)
+			       )
 			       (set! next-touch (+ (current-seconds) 10))
 			       )))))
 	 (topdialog  #f))
     (set! topdialog (iup:vbox ;; iup:dialog 
 		     #:close_cb (lambda (a)(exit))