Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v
diff -u -r1.7.2.46 -r1.7.2.47
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl	17 Apr 2020 21:33:04 -0000	1.7.2.46
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl	18 Apr 2020 11:35:49 -0000	1.7.2.47
@@ -1257,7 +1257,7 @@
       set extra_where_clause ""
       foreach var {creation_user item_id} {
         if {[info exists $var]} {
-          append extra_where_clause "AND $var = [set var] "
+          append extra_where_clause "AND $var = [ns_dbquotevalue [set $var]] "
         }
       }