Index: openacs-4/packages/file-storage/tcl/file-storage-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	20 Apr 2001 20:51:10 -0000	1.1
+++ openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	4 Sep 2001 01:27:51 -0000	1.2
@@ -73,7 +73,7 @@
     if {[string equal [db_string object_type "
     select object_type 
     from   acs_objects
-    where  object_id = :file_id" -default ""] "content_item"]} {
+    where  object_id = :file_id" -default ""] "file_storage_item"]} {
 	return 1
     } else {
 	return 0