Index: openacs-4/packages/xowiki/tcl/chat-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/chat-procs.tcl,v
diff -u -N -r1.25 -r1.26
--- openacs-4/packages/xowiki/tcl/chat-procs.tcl	14 Mar 2018 15:40:49 -0000	1.25
+++ openacs-4/packages/xowiki/tcl/chat-procs.tcl	9 Apr 2018 07:58:06 -0000	1.26
@@ -34,14 +34,14 @@
   Chat proc initialize_nsvs {} {;}      ;# noop
 
   Chat proc login {-chat_id -package_id {-mode ""} {-path ""}} {
-    #my log "--chat"
+    #:log "--chat"
     if {![ns_conn isconnected]} return
     auth::require_login
     if {![info exists package_id]} {set package_id [ad_conn package_id] }
     if {![info exists chat_id]}    {set chat_id $package_id }
     set session_id [ad_conn session_id].[clock seconds]
     set context id=$chat_id&s=$session_id
-    #my log "chat_id=$chat_id, path=$path"
+    #:log "chat_id=$chat_id, path=$path"
     if {$path eq ""} {
       set path [lindex [site_node::get_url_from_object_id -object_id $package_id] 0]
     } elseif {[string index $path end] ne "/"} {