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 -r1.24.2.6 -r1.24.2.7
--- openacs-4/packages/chat/tcl/chat-procs.tcl	2 Mar 2019 17:51:10 -0000	1.24.2.6
+++ openacs-4/packages/chat/tcl/chat-procs.tcl	13 May 2019 10:02:55 -0000	1.24.2.7
@@ -24,7 +24,7 @@
     #array set row [chat_room_get_not_cached $room_id]
 }
 
-ad_proc -private chat_room_get_not_cached {
+ad_proc -deprecated -private chat_room_get_not_cached {
     room_id
 } {
     set r [::xo::db::Class get_instance_from_db -id $room_id]