Index: openacs-4/contrib/obsolete-packages/acs-workflow/www/task.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/www/task.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/obsolete-packages/acs-workflow/www/task.adp 13 Mar 2001 22:59:27 -0000 1.1
+++ openacs-4/contrib/obsolete-packages/acs-workflow/www/task.adp 18 May 2001 00:35:44 -0000 1.2
@@ -40,12 +40,14 @@
@@ -54,4 +56,4 @@
-
\ No newline at end of file
+
Index: openacs-4/contrib/obsolete-packages/acs-workflow/www/task.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/www/task.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/obsolete-packages/acs-workflow/www/task.tcl 15 May 2001 05:09:08 -0000 1.2
+++ openacs-4/contrib/obsolete-packages/acs-workflow/www/task.tcl 18 May 2001 00:35:44 -0000 1.3
@@ -106,6 +106,7 @@
set case_id $task(case_id)
+set case_finished_p [db_string case_finished "select count(*) from wf_cases where case_id = (select distinct case_id from wf_tasks where task_id = :task_id) and state = 'finished'"]
template::multirow create extreme_actions url title
template::multirow append extreme_actions "case-state-change?[export_url_vars case_id]&action=suspend" "suspend case"