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.8 -r1.14.2.9
--- openacs-4/packages/acs-templating/tcl/widget-procs.tcl	25 Apr 2003 08:40:04 -0000	1.14.2.8
+++ openacs-4/packages/acs-templating/tcl/widget-procs.tcl	5 Jun 2003 13:27:09 -0000	1.14.2.9
@@ -380,7 +380,9 @@
   if { [string equal $value {}] } { return [list] } 
 
   if { [string equal $value ":search:"] } { 
-      unset element(options)
+      if { [info exists element(options)] } {
+          unset element(options)
+      }
       template::element::set_error $element(form_id) $element_id "
         Please enter a search string."
       return [list]
@@ -404,7 +406,9 @@
 
       # no search results so return text entry back to the user
 
-      unset element(options)
+      if { [info exists element(options)] } {
+          unset element(options)
+      }
 
       template::element::set_error $element(form_id) $element_id "
         No matches were found for \"$value\".<br>Please