Index: openacs-4/packages/xotcl-core/tcl/message-relay-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/Attic/message-relay-procs.tcl,v
diff -u -N -r1.1.2.4 -r1.1.2.5
--- openacs-4/packages/xotcl-core/tcl/message-relay-procs.tcl	25 Apr 2019 11:34:29 -0000	1.1.2.4
+++ openacs-4/packages/xotcl-core/tcl/message-relay-procs.tcl	25 Apr 2019 15:41:27 -0000	1.1.2.5
@@ -194,7 +194,8 @@
 
       foreach handle [nsv_array names mr_connchan_$key] {
         try {
-          ns_connchan write $handle [:encode_message [nsv_array names mr_connchan_$key $handle] $msg]
+          set mode [nsv_get mr_connchan_$key $handle]
+          ns_connchan write $handle [:encode_message $mode $msg]
         } on error {errorMsg} {
           ns_log warning "message relay: duplicate registration for <$key> attempted"
           :cleanup $key $handle