Index: openacs-4/packages/cms/www/modules/types/widget-register-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/types/widget-register-3.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/cms/www/modules/types/widget-register-3.tcl 20 Apr 2001 20:51:10 -0000 1.1 +++ openacs-4/packages/cms/www/modules/types/widget-register-3.tcl 24 May 2001 23:57:17 -0000 1.2 @@ -19,9 +19,8 @@ wizard submit widget_preview -buttons { back finish } if { [form is_request widget_preview] } { - set db [template::get_db_handle] - template::query outstanding_params_list onelist " + template::query get_outstanding outstanding_params_list onelist " select distinct param from @@ -44,7 +43,7 @@ # the number of required widget params that are missing set outstanding_params [llength $outstanding_params_list] - template::query attribute_names onerow " + template::query get_names attribute_names onerow " select pretty_name, attribute_name, object_type from @@ -53,8 +52,6 @@ attribute_id = :attribute_id " - template::release_db_handle - template::util::array_to_vars attribute_names content::add_attribute_element widget_preview $object_type $attribute_name }