Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v
diff -u -r1.89 -r1.90
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	17 Jul 2018 13:32:18 -0000	1.89
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	25 Jul 2018 01:35:53 -0000	1.90
@@ -1000,7 +1000,7 @@
         }
         set quoted_ids [list]
         foreach one_id $ids {
-            lappend quoted_ids "'[DoubleApos $one_id]'"
+            lappend quoted_ids [::ns_dbquotevalue $one_id]
         }
         return [join $quoted_ids ","]
     }