Index: openacs-4/packages/chat/tcl/chat-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/chat-procs.tcl,v
diff -u -N -r1.24.2.8 -r1.24.2.9
--- openacs-4/packages/chat/tcl/chat-procs.tcl	27 Dec 2019 15:21:09 -0000	1.24.2.8
+++ openacs-4/packages/chat/tcl/chat-procs.tcl	25 Feb 2022 12:56:18 -0000	1.24.2.9
@@ -1,4 +1,3 @@
-# /chat/tcl/chat-procs.tcl
 ad_library {
     TCL Library for the chat system v.6
 
@@ -349,7 +348,7 @@
 
     @see ::xo::db::chat_transcript
 } {
-    ::xo::db::sql::acs_object delete \
+    ::acs::dc call acs_object delete \
         -object_id $transcript_id
 }