Index: openacs-4/packages/chat/www/transcript-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-new.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/chat/www/transcript-new.tcl 19 Nov 2007 01:14:16 -0000 1.6 +++ openacs-4/packages/chat/www/transcript-new.tcl 9 Nov 2008 23:29:23 -0000 1.7 @@ -16,14 +16,14 @@ permission::require_permission -object_id $room_id -privilege chat_transcript_create -set context_bar [list [list "room?room_id=$room_id" "[_ chat.Room_Information]"] "[_ chat.Create_transcript]"] +set title "[_ chat.Create_transcript]" +set context [list [list "room?room_id=$room_id" "[_ chat.Room_Information]"] $title] set transcript_id "" set transcript_name "[_ chat.transcript_of_date] [clock format [clock seconds] -format "%d.%m.%y %H:%M:%S"]" set description "" set contents "" set action "transcript-new-2" -set title "[_ chat.Create_transcript]" set submit_label "[_ chat.Create_transcript]" set active_p [room_active_status $room_id]