Index: openacs-4/packages/caldav/tcl/caldav-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/caldav/tcl/caldav-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/caldav/tcl/caldav-procs.tcl	9 May 2022 17:40:39 -0000	1.1.2.1
+++ openacs-4/packages/caldav/tcl/caldav-procs.tcl	25 Jun 2022 12:06:17 -0000	1.1.2.2
@@ -967,10 +967,10 @@
         #
         set uid_clauses {}
         if {[llength $cal_uids] > 0} {
-            lappend uid_clauses "u.cal_uid in ([ template::util::tcl_to_sql_list $cal_uids ])"
+            lappend uid_clauses "u.cal_uid in ([ns_dbquotelist $cal_uids])"
         }
         if {[llength $act_ids] > 0} {
-            lappend uid_clauses "e.activity_id in ([ template::util::tcl_to_sql_list $act_ids ])"
+            lappend uid_clauses "e.activity_id in ([ns_dbquotelist $act_ids])"
         }
         ns_log notice uid_clauses=$uid_clauses