Index: openacs-4/packages/chat/www/chat.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/chat/www/chat.tcl 19 Nov 2007 01:14:16 -0000 1.12 +++ openacs-4/packages/chat/www/chat.tcl 9 Nov 2008 23:29:23 -0000 1.13 @@ -11,7 +11,7 @@ {client "ajax"} {message:html ""} } -properties { - context_bar:onevalue + context:onevalue user_id:onevalue user_name:onevalue message:onevalue @@ -29,7 +29,11 @@ ad_return_complaint 1 "[_ chat.Room_not_found]" } -set context_bar $room_name +set doc(title) $room_name +set doc(type) {} + +set context [list $doc(title)] + auth::require_login set user_id [ad_conn user_id] set read_p [permission::permission_p -object_id $room_id -privilege "chat_read"]