Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -N -r1.140.2.4 -r1.140.2.5
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	10 Sep 2015 08:22:01 -0000	1.140.2.4
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	10 Sep 2015 18:40:03 -0000	1.140.2.5
@@ -491,7 +491,7 @@
 
 ad_proc -public db_html_select_value_options {
     { -bind "" }
-    { -select_option [list] }
+    { -select_option "" }
     { -value_index 0 }
     { -option_index 1 }
     stmt_name
@@ -517,9 +517,9 @@
 
     foreach option $options {
 	if { [lindex $option $value_index] in $select_option } {
-	    append select_options "<option value=\"[ad_quotehtml [lindex $option $value_index]]\" selected=\"selected\">[lindex $option $option_index]</option>\n"
+	    append select_options "<option value=\"[ns_quotehtml [lindex $option $value_index]]\" selected=\"selected\">[lindex $option $option_index]</option>\n"
 	} else {
-	    append select_options "<option value=\"[ad_quotehtml [lindex $option $value_index]]\">[lindex $option $option_index]</option>\n"
+	    append select_options "<option value=\"[ns_quotehtml [lindex $option $value_index]]\">[lindex $option $option_index]</option>\n"
 	}
     }
     return $select_options