Index: openacs-4/packages/acs-templating/tcl/wizard-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/wizard-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-templating/tcl/wizard-procs.tcl	30 Sep 2003 11:56:42 -0000	1.4
+++ openacs-4/packages/acs-templating/tcl/wizard-procs.tcl	7 Oct 2003 10:53:58 -0000	1.5
@@ -467,10 +467,13 @@
 }
 
 
-ad_proc -public template::wizard::forward { {cache_p "f"} {persistent_p "f"} {excluded_vars ""} } {
+ad_proc -public template::wizard::forward { } {
     call when a step has been validated and completed.
     checks which submit button was pressed and proceeds accordingly.
 } {
+    set cache_p "f"
+    set persistent_p "f"
+    set excluded_vars ""
 
     get_reference
 
@@ -514,7 +517,13 @@
 
     upvar #$level wizard:params params
 
-    set url [ns_conn url]?wizard_step=$step_id
+    set url [ns_conn url]?wizard_step${wizard_name}=$step_id&wizard_name=$wizard_name
+  
+    # create the wizards and keep track of their steps too
+    foreach one_wizard $wizards {
+        append url "&wizard_step${one_wizard}=[ns_queryget wizard_step${one_wizard}]"
+        append url "&wizard_visitedstep${one_wizard}=[ns_queryget wizard_visitedstep${one_wizard}]"
+    }
 
     set multiple_listed [list]