Index: openacs-4/packages/chat/tcl/chat-ajax-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/chat-ajax-procs.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/chat/tcl/chat-ajax-procs.tcl	20 Nov 2018 17:46:20 -0000	1.26
+++ openacs-4/packages/chat/tcl/chat-ajax-procs.tcl	21 Nov 2018 09:56:37 -0000	1.27
@@ -37,9 +37,15 @@
             return [_ chat.Room_not_found]
         } else {
             chat_room_get -room_id $chat_id -array c
-            set package_id $c(context_id)
+            next \
+                -chat_id $chat_id \
+                -package_id $c(context_id) \
+                -mode $mode \
+                -path $path \
+                -login_messages_p $c(login_messages_p) \
+                -logout_messages_p $c(logout_messages_p) \
+                -timewindow $c(messages_time_window)
         }
-        next -chat_id $chat_id -package_id $package_id -mode $mode -path $path
     }
 
     Chat instproc initialize_nsvs {} {
@@ -60,12 +66,6 @@
             ad_return_forbidden
             ad_script_abort
         }
-        if {[chat_room_exists_p ${:chat_id}]} {
-            chat_room_get -room_id ${:chat_id} -array c
-            set :login_messages_p  $c(login_messages_p)
-            set :logout_messages_p $c(logout_messages_p)
-            set :timewindow        $c(messages_time_window)
-        }
         next
     }