Index: openacs-4/packages/tasks/tcl/tasks-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tasks/tcl/tasks-callback-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/tasks/tcl/tasks-callback-procs.tcl	4 Mar 2006 22:57:25 -0000	1.6
+++ openacs-4/packages/tasks/tcl/tasks-callback-procs.tcl	4 Mar 2006 23:55:28 -0000	1.7
@@ -90,8 +90,9 @@
                mime_type, comment, status_id, priority,
 	       to_char((now()+ (start::varchar || ' days')::interval), 'YYYY-MM-DD') as start_date,
 	       to_char((now()+ (due::varchar || ' days')::interval), 'YYYY-MM-DD') as due_date
-	from t_process_tasks
-	where open_action_id = :action_id
+               from t_process_tasks
+         where open_action_id = :action_id
+           and status_id is not null
     }]
 
     foreach task $tasks {