Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -r1.248.2.5 -r1.248.2.6
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	7 Sep 2015 19:24:48 -0000	1.248.2.5
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	18 Sep 2015 07:37:43 -0000	1.248.2.6
@@ -2322,7 +2322,7 @@
     foreach category [::xowiki::Category get_category_infos \
                           -subtree_id $subtree_id -tree_id $tree_id] {
       lassign $category category_id category_name deprecated_p level
-      set category_name [ad_quotehtml [lang::util::localize $category_name]]
+      set category_name [ns_quotehtml [lang::util::localize $category_name]]
       my set category_label($category_id) $category_name
       if { $level>1 } {
         set category_name "[string repeat {.} [expr {2*$level-4}]]..$category_name"