Index: openacs-4/packages/acs-content-repository/tcl/test/content-search-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/test/content-search-procs.tcl,v
diff -u -N -r1.6.2.3 -r1.6.2.4
--- openacs-4/packages/acs-content-repository/tcl/test/content-search-procs.tcl	3 Mar 2021 14:04:08 -0000	1.6.2.3
+++ openacs-4/packages/acs-content-repository/tcl/test/content-search-procs.tcl	27 Jan 2022 09:23:58 -0000	1.6.2.4
@@ -16,7 +16,7 @@
             select count(*) from search_observer_queue
             where object_id = :revision_id
             and event in
-            ([template::util::tcl_to_sql_list $events])
+            ([ns_dbquotelist $events])
         }] -default 0]
 }
 
@@ -34,7 +34,7 @@
             select count(*) from search_observer_queue
             where object_id = :revision_id
             and event in
-            ([template::util::tcl_to_sql_list $events])
+            ([ns_dbquotelist $events])
         }] -default 0]
 }