Index: openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl,v diff -u -r1.16.2.2 -r1.16.2.3 --- openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl 9 Oct 2002 13:24:52 -0000 1.16.2.2 +++ openacs-4/packages/acs-tcl/tcl/form-processing-procs.tcl 15 Oct 2002 19:56:03 -0000 1.16.2.3 @@ -581,10 +581,11 @@ return -code error "element $element_name: \"$flag\" attribute must have a parameter" } set name af_$flag - append name "($element_name)" + append name "(${form_name}__$element_name)" if { [info exists $name] } { return -code error "element $element_name: \"$flag\" appears twice" } + global $name set $name $af_element_parameters($element_name:$flag) } @@ -639,10 +640,6 @@ # Check that any acquire and get_property attributes are supported by their element's datatype # These are needed at submission and fill-the-form-with-db-values time - global af_from_sql - global af_to_sql - global af_to_html - foreach element_name $af_element_names($form_name) { if { [llength $element_name] == 1 } { if { [info exists af_from_sql(${form_name}__$element_name)] } {