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.2.8.1 -r1.2.8.2 --- openacs-4/packages/chat/www/chat-transcripts.tcl 20 Jun 2016 08:40:23 -0000 1.2.8.1 +++ openacs-4/packages/chat/www/chat-transcripts.tcl 9 Jun 2017 17:47:19 -0000 1.2.8.2 @@ -10,6 +10,7 @@ if { [catch {set room_name [chat_room_name $room_id]} errmsg] } { ad_return_complaint 1 "[_ chat.Room_not_found]" + ad_script_abort } set active [room_active_status $room_id] Index: openacs-4/packages/chat/www/html-chat.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/html-chat.tcl,v diff -u -r1.4.4.1 -r1.4.4.2 --- openacs-4/packages/chat/www/html-chat.tcl 20 Jun 2016 08:40:23 -0000 1.4.4.1 +++ openacs-4/packages/chat/www/html-chat.tcl 9 Jun 2017 17:47:19 -0000 1.4.4.2 @@ -25,6 +25,7 @@ if { [catch {set room_name [chat_room_name $room_id]} errmsg] } { ad_return_complaint 1 "[_ chat.Room_not_found]" + ad_script_abort } ::chat::Chat c1 -volatile -encoder noencode -chat_id $room_id Index: openacs-4/packages/chat/www/message-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/message-delete-2.tcl,v diff -u -r1.7.6.1 -r1.7.6.2 --- openacs-4/packages/chat/www/message-delete-2.tcl 20 Jun 2016 08:40:23 -0000 1.7.6.1 +++ openacs-4/packages/chat/www/message-delete-2.tcl 9 Jun 2017 17:47:19 -0000 1.7.6.2 @@ -13,8 +13,9 @@ if { [catch {chat_room_message_delete $room_id} errmsg] } { ad_return_complaint 1 "[_ chat.Delete_messages_failed]: $errmsg" + ad_script_abort } ::chat::Chat flush_messages -chat_id $room_id -ad_returnredirect . \ No newline at end of file +ad_returnredirect . Index: openacs-4/packages/chat/www/room-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-delete-2.tcl,v diff -u -r1.5.6.1 -r1.5.6.2 --- openacs-4/packages/chat/www/room-delete-2.tcl 20 Jun 2016 08:40:23 -0000 1.5.6.1 +++ openacs-4/packages/chat/www/room-delete-2.tcl 9 Jun 2017 17:47:19 -0000 1.5.6.2 @@ -13,6 +13,7 @@ if { [catch {chat_room_delete $room_id} errmsg] } { ad_return_complaint 1 "[_ chat.Delete_room_failed]: $errmsg" + ad_script_abort } ad_returnredirect . Index: openacs-4/packages/chat/www/transcript-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete-2.tcl,v diff -u -r1.3.12.1 -r1.3.12.2 --- openacs-4/packages/chat/www/transcript-delete-2.tcl 20 Jun 2016 08:40:23 -0000 1.3.12.1 +++ openacs-4/packages/chat/www/transcript-delete-2.tcl 9 Jun 2017 17:47:19 -0000 1.3.12.2 @@ -13,6 +13,7 @@ if { [catch {chat_transcript_delete $transcript_id} errmsg] } { ad_return_complaint 1 "[_ chat.Delete_transcript_failed]: $errmsg" + ad_script_abort } ad_returnredirect "room?room_id=$room_id" 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.6.6.1 -r1.6.6.2 --- openacs-4/packages/chat/www/transcript-edit.tcl 20 Jun 2016 08:40:23 -0000 1.6.6.1 +++ openacs-4/packages/chat/www/transcript-edit.tcl 9 Jun 2017 17:47:19 -0000 1.6.6.2 @@ -46,6 +46,7 @@ } -on_submit { if { [catch {chat_transcript_edit $transcript_id $pretty_name $description $contents} errmsg] } { 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" }