Index: openacs-4/packages/file-storage/www/version-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/version-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/file-storage/www/version-delete.tcl	5 Sep 2002 09:29:00 -0000	1.5
+++ openacs-4/packages/file-storage/www/version-delete.tcl	17 Sep 2002 21:03:27 -0000	1.6
@@ -50,11 +50,14 @@
 	 # Redirect to the folder, instead of the latest revision (which does not exist anymore)
 	 ad_returnredirect "index?folder_id=$parent_id"
 
+         ad_script_abort
+
     } else {
 
 	 # Ok, we don't have to do anything fancy, just redirect to th last revision
 	 ad_returnredirect "file?file_id=$item_id"
-
+         
+         ad_script_abort
     }
 
 } else {
@@ -67,5 +70,4 @@
     and revision_id = :version_id"
 
     set context [fs_context_bar_list -final "Delete Version" $item_id]
-    ad_return_template
 }