Index: openacs-4/contrib/packages/simulation/www/citybuild/object-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/citybuild/Attic/object-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/contrib/packages/simulation/www/citybuild/object-delete.tcl	30 Jan 2004 14:41:58 -0000	1.5
+++ openacs-4/contrib/packages/simulation/www/citybuild/object-delete.tcl	2 Feb 2004 12:57:02 -0000	1.6
@@ -11,7 +11,9 @@
 if { [template::util::is_true $confirm_p] } {
     permission::require_write_permission -object_id $item_id    
     bcms::item::delete_item -item_id $item_id
-    ad_returnredirect -message "\"$item(title)\" has been deleted." -abort $return_url
+
+    ad_returnredirect -message "\"$item(title)\" has been deleted." $return_url
+    ad_script_abort
 }
 
 set page_title "Delete object \"$item(title)\""
Index: openacs-4/contrib/packages/simulation/www/citybuild/object-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/citybuild/Attic/object-edit.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/contrib/packages/simulation/www/citybuild/object-edit.tcl	30 Jan 2004 11:22:57 -0000	1.20
+++ openacs-4/contrib/packages/simulation/www/citybuild/object-edit.tcl	2 Feb 2004 12:57:02 -0000	1.21
@@ -723,7 +723,8 @@
     }
     
 } -after_submit {
-    ad_returnredirect -message "\"$title\" has been saved." -abort "."
+    ad_returnredirect -message "\"$title\" has been saved." "."
+    ad_script_abort
 }
 
 
Index: openacs-4/contrib/packages/simulation/www/simplay/case-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/simplay/Attic/case-delete.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/simulation/www/simplay/case-delete.tcl	30 Jan 2004 09:44:19 -0000	1.1
+++ openacs-4/contrib/packages/simulation/www/simplay/case-delete.tcl	2 Feb 2004 12:57:02 -0000	1.2
@@ -13,7 +13,8 @@
 
 if { [template::util::is_true $confirm_p] } {
     workflow::case::delete -case_id $case_id
-    ad_returnredirect -message "Case \"$case(label)\" has been deleted." -abort "."
+    ad_returnredirect -message "Case \"$case(label)\" has been deleted." "."
+    ad_script_abort
 }
 
 set page_title "Delete case \"$case(label)\""
Index: openacs-4/packages/simulation/www/citybuild/object-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/citybuild/object-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/simulation/www/citybuild/object-delete.tcl	30 Jan 2004 14:41:58 -0000	1.5
+++ openacs-4/packages/simulation/www/citybuild/object-delete.tcl	2 Feb 2004 12:57:02 -0000	1.6
@@ -11,7 +11,9 @@
 if { [template::util::is_true $confirm_p] } {
     permission::require_write_permission -object_id $item_id    
     bcms::item::delete_item -item_id $item_id
-    ad_returnredirect -message "\"$item(title)\" has been deleted." -abort $return_url
+
+    ad_returnredirect -message "\"$item(title)\" has been deleted." $return_url
+    ad_script_abort
 }
 
 set page_title "Delete object \"$item(title)\""
Index: openacs-4/packages/simulation/www/citybuild/object-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/citybuild/object-edit.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/simulation/www/citybuild/object-edit.tcl	30 Jan 2004 11:22:57 -0000	1.20
+++ openacs-4/packages/simulation/www/citybuild/object-edit.tcl	2 Feb 2004 12:57:02 -0000	1.21
@@ -723,7 +723,8 @@
     }
     
 } -after_submit {
-    ad_returnredirect -message "\"$title\" has been saved." -abort "."
+    ad_returnredirect -message "\"$title\" has been saved." "."
+    ad_script_abort
 }
 
 
Index: openacs-4/packages/simulation/www/simplay/case-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/simplay/case-delete.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/simulation/www/simplay/case-delete.tcl	30 Jan 2004 09:44:19 -0000	1.1
+++ openacs-4/packages/simulation/www/simplay/case-delete.tcl	2 Feb 2004 12:57:02 -0000	1.2
@@ -13,7 +13,8 @@
 
 if { [template::util::is_true $confirm_p] } {
     workflow::case::delete -case_id $case_id
-    ad_returnredirect -message "Case \"$case(label)\" has been deleted." -abort "."
+    ad_returnredirect -message "Case \"$case(label)\" has been deleted." "."
+    ad_script_abort
 }
 
 set page_title "Delete case \"$case(label)\""