Index: openacs-4/contrib/packages/simulation/www/simbuild/template-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simbuild/Attic/template-edit.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/contrib/packages/simulation/www/simbuild/template-edit.tcl	8 Jan 2004 11:06:16 -0000	1.16
+++ openacs-4/contrib/packages/simulation/www/simbuild/template-edit.tcl	8 Jan 2004 12:34:28 -0000	1.17
@@ -173,8 +173,7 @@
 set spec_url [export_vars -base template-spec { workflow_id }]
 
 
-if { [info exists sim_template_array(sim_type)] } {
-    if { [string equal $sim_template_array(sim_type) "dev_template"] } {
-        set mark_ready_url [export_vars -base "template-sim-type-update" { workflow_id }]
-    }
+
+if { [exists_and_equal sim_template_array(sim_type) "dev_template"] } {
+    set mark_ready_url [export_vars -base "template-sim-type-update" { workflow_id }]
 }
Index: openacs-4/packages/simulation/www/simbuild/template-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simbuild/template-edit.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/simulation/www/simbuild/template-edit.tcl	8 Jan 2004 11:06:16 -0000	1.16
+++ openacs-4/packages/simulation/www/simbuild/template-edit.tcl	8 Jan 2004 12:34:28 -0000	1.17
@@ -173,8 +173,7 @@
 set spec_url [export_vars -base template-spec { workflow_id }]
 
 
-if { [info exists sim_template_array(sim_type)] } {
-    if { [string equal $sim_template_array(sim_type) "dev_template"] } {
-        set mark_ready_url [export_vars -base "template-sim-type-update" { workflow_id }]
-    }
+
+if { [exists_and_equal sim_template_array(sim_type) "dev_template"] } {
+    set mark_ready_url [export_vars -base "template-sim-type-update" { workflow_id }]
 }