Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -N -r1.239.2.44 -r1.239.2.45
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	3 May 2020 17:12:21 -0000	1.239.2.44
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	19 May 2020 15:35:59 -0000	1.239.2.45
@@ -207,7 +207,7 @@
         }
         lappend and_names [::category::get_name $cid_and]
         lappend ands "exists (select 1 from category_object_map \
-           where object_id = [ns_dbquotevalue $item_ref] and category_id = [ns_dbquotevalue $cid_and])"
+           where object_id = $item_ref and category_id = [ns_dbquotevalue $cid_and])"
       }
       lappend or_names [join $and_names { and }]
       lappend ors "([join $ands { and }])"