Index: openacs-4/packages/simulation/www/simbuild/role-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simbuild/role-delete.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/simulation/www/simbuild/role-delete.tcl	16 Dec 2003 18:34:00 -0000	1.3
+++ openacs-4/packages/simulation/www/simbuild/role-delete.tcl	23 Jan 2004 11:16:15 -0000	1.4
@@ -12,12 +12,9 @@
 set package_id [ad_conn package_id]
 set num_of_tasks [db_string task_count "
 select count(*) 
-  from workflow_actions wa,
-       sim_tasks st
- where st.task_id = wa.action_id
-   and wa.assigned_role = :role_id
-    or st.recipient = :role_id
-   "
+  from workflow_actions wa
+ where wa.assigned_role = :role_id
+"
                   ]
 workflow::role::get -role_id $role_id -array role_array
 set name $role_array(pretty_name)