Index: openacs-4/packages/chat/www/chat-transcripts.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat-transcripts.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/chat/www/chat-transcripts.tcl 7 Aug 2017 23:48:07 -0000 1.4 +++ openacs-4/packages/chat/www/chat-transcripts.tcl 18 Jan 2019 17:14:36 -0000 1.5 @@ -6,7 +6,7 @@ @creation-date March 26, 2006 } { room_id:naturalnum,notnull -} +} if { [catch {set room_name [chat_room_name $room_id]} errmsg] } { ad_return_complaint 1 "[_ chat.Room_not_found]" @@ -15,3 +15,8 @@ set active [room_active_status $room_id] +# Local variables: +# mode: tcl +# tcl-indent-level: 2 +# indent-tabs-mode: nil +# End: