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 -N -r1.20 -r1.21 --- openacs-4/packages/chat/tcl/chat-ajax-procs.tcl 28 Sep 2018 11:44:23 -0000 1.20 +++ openacs-4/packages/chat/tcl/chat-ajax-procs.tcl 1 Oct 2018 12:17:00 -0000 1.21 @@ -12,7 +12,7 @@ Chat instproc initialize_nsvs {} { next - + # read the last_activity information at server start into a nsv array ::xo::dc foreach get_rooms { select room_id, to_char(max(creation_date),'HH24:MI:SS YYYY-MM-DD') as last_activity Index: openacs-4/packages/chat/www/chat.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat.tcl,v diff -u -N -r1.18 -r1.19 --- openacs-4/packages/chat/www/chat.tcl 28 Sep 2018 11:44:23 -0000 1.18 +++ openacs-4/packages/chat/www/chat.tcl 1 Oct 2018 12:17:00 -0000 1.19 @@ -14,7 +14,7 @@ user_name:onevalue message:onevalue room_id:onevalue - room_name:onevalue + room_name:onevalue width:onevalue height:onevalue host:onevalue @@ -58,3 +58,9 @@ set chat_frame [::chat::Chat login \ -package_id [ad_conn package_id] \ -chat_id $room_id] + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: Index: openacs-4/packages/chat/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index.tcl,v diff -u -N -r1.17 -r1.18 --- openacs-4/packages/chat/www/index.tcl 28 Sep 2018 11:44:23 -0000 1.17 +++ openacs-4/packages/chat/www/index.tcl 1 Oct 2018 12:17:00 -0000 1.18 @@ -94,3 +94,9 @@ set doc(title) [_ chat.Chat_main_page] ad_return_template + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: Index: openacs-4/packages/chat/www/room-enter.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-enter.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/chat/www/room-enter.tcl 28 Sep 2018 11:44:23 -0000 1.11 +++ openacs-4/packages/chat/www/room-enter.tcl 1 Oct 2018 12:17:00 -0000 1.12 @@ -25,3 +25,9 @@ } ad_returnredirect "chat?room_id=$room_id" + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: Index: openacs-4/packages/chat/www/room-exit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-exit.tcl,v diff -u -N -r1.9 -r1.10 --- openacs-4/packages/chat/www/room-exit.tcl 28 Sep 2018 11:44:23 -0000 1.9 +++ openacs-4/packages/chat/www/room-exit.tcl 1 Oct 2018 12:17:00 -0000 1.10 @@ -26,3 +26,9 @@ c1 logout ad_returnredirect index + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: Index: openacs-4/packages/chat/www/ajax/chat.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/ajax/Attic/chat.tcl,v diff -u -N -r1.9 -r1.10 --- openacs-4/packages/chat/www/ajax/chat.tcl 28 Sep 2018 11:44:23 -0000 1.9 +++ openacs-4/packages/chat/www/ajax/chat.tcl 1 Oct 2018 12:17:00 -0000 1.10 @@ -18,7 +18,7 @@ ad_script_abort } -#ns_log notice "--chat m=$m session_id=$s [clock format [lindex [split $s .] 1] -format %H:%M:%S] mode=$mode" +#ns_log notice "--chat m=$m session_id=$s [clock format [lindex [split $s .] 1] -format %H:%M:%S] mode=$mode" ::chat::Chat create c1 -destroy_on_cleanup -chat_id $id -session_id $s -mode $mode switch -- $m { add_msg { @@ -40,3 +40,9 @@ #ns_log notice "--chat.tcl $m: returns '$_'" ns_return 200 text/html [subst {$_}] + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: