Index: openacs-4/packages/acs-templating/tcl/widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/widget-procs.tcl,v
diff -u -N -r1.14.2.5 -r1.14.2.6
--- openacs-4/packages/acs-templating/tcl/widget-procs.tcl	20 Mar 2003 12:49:15 -0000	1.14.2.5
+++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl	20 Mar 2003 16:31:14 -0000	1.14.2.6
@@ -390,13 +390,8 @@
     }
 
     set query $element(search_query)
-    if { [info exists element(search_query_name)] } {
-        set query_name $element(search_query_name)
-    } else {
-        set query_name "get_options"
-    }
 
-    set options [db_list_of_lists $query_name $query]
+    set options [db_list_of_lists get_options $query]
 
     set option_count [llength $options]