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.5 -r1.6
--- openacs-4/packages/simulation/www/simbuild/template-edit.tcl	2 Dec 2003 17:24:32 -0000	1.5
+++ openacs-4/packages/simulation/www/simbuild/template-edit.tcl	9 Dec 2003 09:52:45 -0000	1.6
@@ -27,11 +27,13 @@
 
 if { [ad_form_new_p -key workflow_id] } {
     set mode edit
+    set cancel_url .
 } else {
     set mode display
+    set cancel_url [export_vars -base [ad_conn url] { workflow_id }]
 }
 
-ad_form -name sim_template -mode $mode -cancel_url . -form {
+ad_form -name sim_template -mode $mode -cancel_url $cancel_url -form {
     {workflow_id:key}
     {name:text,optional
         {label "Template Name"}