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.9 -r1.10 --- openacs-4/packages/file-storage/www/version-delete.tcl 19 Jan 2004 14:43:40 -0000 1.9 +++ openacs-4/packages/file-storage/www/version-delete.tcl 19 Jun 2004 14:47:48 -0000 1.10 @@ -57,9 +57,10 @@ file_storage.delete_file(:item_id); end;" + fs::do_notifications -folder_id $parent_id -filename $version_name -file_id $item_id -action "delete_file" + # 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 {