Index: openacs.org-dev/packages/webmail/www/admin/delete-user-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/webmail/www/admin/delete-user-2.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/webmail/www/admin/delete-user-2.tcl	9 Jul 2002 17:35:19 -0000	1.1.1.1
+++ openacs.org-dev/packages/webmail/www/admin/delete-user-2.tcl	8 Oct 2002 15:47:44 -0000	1.1.1.2
@@ -20,7 +20,7 @@
 	set result "[ad_admin_header "Delete User"]
 	<h2>Delete User</h2>
 	
-	[ad_admin_context_bar [list "index.tcl" "WebMail Admin"] "One Domain"]
+	[ad_admin_context_bar [list "./" "WebMail Admin"] "One Domain"]
 	
 	<hr><br>
 	<b>We received the following error:</b>
@@ -36,9 +36,10 @@
 	doc_return 200 text/html $result
     } else {
 	ad_returnredirect "domain-one?[export_url_vars short_name]"
+        ad_script_abort
     }
 } else {
     ad_returnredirect "domain-one-user?[export_url_vars user_id short_name]"
-    return
+    ad_script_abort
 }