Index: openacs-4/packages/chat/www/transcript-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-edit.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/chat/www/transcript-edit.tcl 16 Nov 2018 14:15:08 -0000 1.9 +++ openacs-4/packages/chat/www/transcript-edit.tcl 16 Nov 2018 14:15:29 -0000 1.10 @@ -8,7 +8,7 @@ } { transcript_id:naturalnum,notnull room_id:naturalnum,notnull -} +} permission::require_permission -object_id $transcript_id -privilege chat_transcript_edit set context_bar [list "[_ chat.Edit_transcript]"] @@ -25,10 +25,10 @@ ad_form -name "edit-transcription" -edit_buttons [list [list [_ chat.Edit] next]] -has_edit 1 -form { {room_id:integer(hidden) {value $room_id} - } + } {transcript_id:integer(hidden) {value $transcript_id} - } + } {pretty_name:text(text) {label "#chat.Transcript_name#" } {value $pretty_name} @@ -48,6 +48,6 @@ ad_return_complaint 1 "[_ chat.Could_not_update_transcript]: $errmsg" ad_script_abort } - ad_returnredirect "chat-transcript?transcript_id=$transcript_id&room_id=$room_id" + ad_returnredirect "chat-transcript?transcript_id=$transcript_id&room_id=$room_id" ad_script_abort }