Index: openacs-4/packages/file-storage/www/file-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/file-delete.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/file-storage/www/file-delete.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/file-storage/www/file-delete.tcl	17 Aug 2001 14:12:28 -0000	1.2
@@ -40,7 +40,7 @@
 
     db_1row parent_id "select parent_id from cr_items where item_id = :file_id"
 
-    db_exec_plsql file-delete "
+    db_exec_plsql file_delete "
     begin
         content_item.delete(:file_id);
     end;"