Index: openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl 12 Jul 2004 14:49:49 -0000 1.7 +++ openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl 27 Jul 2006 00:42:52 -0000 1.8 @@ -536,7 +536,16 @@ { -object_type "acs_object" } { -variable_prefix "" } } { + Adds form elements to the specified form_id. Each form element + corresponds to an attribute belonging to the given object_type. + @param form_id ID of a form to add form elements to. + @param start_with Object type to start with. Defaults to acs_object. + @param object_type Object type to extract attributes for. + Defaults to acs_object. + @param variable_prefix Variable prefix. +} { + if {[empty_string_p $form_id]} { error "attribute::add_form_elements - form_id not specified" }