Index: openacs-4/packages/simulation/www/simplay/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/index.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/simulation/www/simplay/index.tcl	23 Jan 2004 13:18:44 -0000	1.8
+++ openacs-4/packages/simulation/www/simplay/index.tcl	23 Jan 2004 15:14:01 -0000	1.9
@@ -24,7 +24,4 @@
 if { [llength $case_list] == 1 } {
     set case_id [lindex [lindex $case_list 0] 0]
     set role_id [lindex [lindex $case_list 0] 1]
-# TODO REMOVE
-#    ad_returnredirect [export_vars -base case { case_id role_id }]
-#    ad_script_abort
 }