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.29 -r1.30
--- openacs-4/packages/chat/tcl/chat-ajax-procs.tcl	22 Nov 2018 09:08:33 -0000	1.29
+++ openacs-4/packages/chat/tcl/chat-ajax-procs.tcl	6 Dec 2018 16:51:14 -0000	1.30
@@ -32,12 +32,13 @@
 namespace eval ::chat {
     ::xo::ChatClass Chat -superclass ::xowiki::Chat
 
-    Chat proc login {-chat_id {-package_id ""} {-mode ""} {-path ""}} {
+    Chat proc login {-chat_id {-package_id ""} {-mode ""} {-path ""} {-skin ""}} {
         if {![chat_room_exists_p $chat_id]} {
             return [_ chat.Room_not_found]
         } else {
             chat_room_get -room_id $chat_id -array c
             next -chat_id $chat_id \
+                -skin $skin \
                 -package_id $c(context_id) \
                 -mode $mode \
                 -path $path \