Index: openacs-4/packages/chat/www/room-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-edit.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/chat/www/room-edit.tcl	7 Aug 2017 23:48:07 -0000	1.13
+++ openacs-4/packages/chat/www/room-edit.tcl	20 Jan 2018 22:56:50 -0000	1.14
@@ -89,7 +89,7 @@
 			 -creation_ip          [ad_conn peeraddr] $pretty_name]
     } errmsg]} {
         ad_return_complaint 1 "[_ chat.Create_new_room_failed]: $errmsg"
-        break
+        ad_script_abort
     }
     set comm_id ""
     if {[info commands dotlrn_community::get_community_id] ne ""} {
@@ -119,7 +119,7 @@
 	set messages_time_window $r(messages_time_window)
     } errmsg]} {
 	ad_return_complaint 1 "[_ chat.Room_not_found]."
-        break
+        ad_script_abort
     }
 } -edit_data {
     if {[catch {
@@ -137,7 +137,7 @@
 	    $messages_time_window
     } errmsg]} {
         ad_return_complaint 1 "[_ chat.Could_not_update_room]: $errmsg"
-        break
+        ad_script_abort
     }
 } -after_submit {
     ad_returnredirect "room?room_id=$room_id"