Index: openacs-4/contrib/packages/simulation/lib/sim-insts-grouped.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/sim-insts-grouped.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/simulation/lib/sim-insts-grouped.tcl	11 Dec 2003 13:21:52 -0000	1.1
+++ openacs-4/contrib/packages/simulation/lib/sim-insts-grouped.tcl	8 Jan 2004 11:28:07 -0000	1.2
@@ -51,8 +51,8 @@
        and ss.simulation_id = w.workflow_id
        and ao.object_id = w.workflow_id
        and (ss.sim_type = 'dev_sim' or ss.sim_type = 'casting_sim')
+     $sim_filter_sql
      group by ss.sim_type
-    $sim_filter_sql
 " {
     set cast_url [export_vars -base "cast-edit" { workflow_id }]
 }
Index: openacs-4/contrib/packages/simulation/www/siminst/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/index.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/contrib/packages/simulation/www/siminst/index.tcl	7 Jan 2004 14:46:04 -0000	1.27
+++ openacs-4/contrib/packages/simulation/www/siminst/index.tcl	8 Jan 2004 11:28:07 -0000	1.28
@@ -5,6 +5,7 @@
 set page_title "SimInst"
 set context [list $page_title]
 set package_id [ad_conn package_id]
+set user_id [ad_conn user_id]
 
 permission::require_permission -object_id $package_id -privilege sim_inst
 set admin_p [permission::permission_p -object_id $package_id -privilege admin]
Index: openacs-4/packages/simulation/lib/sim-insts-grouped.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/sim-insts-grouped.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/lib/sim-insts-grouped.tcl	11 Dec 2003 13:21:52 -0000	1.1
+++ openacs-4/packages/simulation/lib/sim-insts-grouped.tcl	8 Jan 2004 11:28:07 -0000	1.2
@@ -51,8 +51,8 @@
        and ss.simulation_id = w.workflow_id
        and ao.object_id = w.workflow_id
        and (ss.sim_type = 'dev_sim' or ss.sim_type = 'casting_sim')
+     $sim_filter_sql
      group by ss.sim_type
-    $sim_filter_sql
 " {
     set cast_url [export_vars -base "cast-edit" { workflow_id }]
 }
Index: openacs-4/packages/simulation/www/siminst/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/index.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/simulation/www/siminst/index.tcl	7 Jan 2004 14:46:04 -0000	1.27
+++ openacs-4/packages/simulation/www/siminst/index.tcl	8 Jan 2004 11:28:07 -0000	1.28
@@ -5,6 +5,7 @@
 set page_title "SimInst"
 set context [list $page_title]
 set package_id [ad_conn package_id]
+set user_id [ad_conn user_id]
 
 permission::require_permission -object_id $package_id -privilege sim_inst
 set admin_p [permission::permission_p -object_id $package_id -privilege admin]