Index: openacs-4/packages/acs-templating/resources/forms/confirm-button.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/resources/forms/confirm-button.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/acs-templating/resources/forms/confirm-button.tcl 29 Sep 2003 13:23:11 -0000 1.4 +++ openacs-4/packages/acs-templating/resources/forms/confirm-button.tcl 9 Oct 2003 11:14:38 -0000 1.5 @@ -10,7 +10,7 @@ # step never happened. # There's one exception - we set the special form element "__confirmed_p" true. This -# informs ad_form that the use has indeed confirmed the submission. +# informs ad_form that the user has indeed confirmed the submission. multirow create __form_contents__ __key__ __value__ @@ -23,8 +23,18 @@ if { [string equal [ns_set key $__form__ $__form_counter__] __confirmed_p] } { multirow append __form_contents__ __confirmed_p 1 } else { - multirow append __form_contents__ [ns_set key $__form__ $__form_counter__] \ + + set __key__ [ns_set key $__form__ $__form_counter__] + # QUIRK: ns_querygetall returns a single-element list {{key1 key2 ...}} + set __values__ [ns_querygetall $__key__] + foreach __value__ $__values__ { + multirow append __form_contents__ $__key__ $__value__ + } + + #multirow append __form_contents__ [ns_set key $__form__ $__form_counter__] \ [ns_set value $__form__ $__form_counter__] + + } incr __form_counter__ }