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.42 -r1.42.2.1
--- openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	19 Feb 2004 16:44:45 -0000	1.42
+++ openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	23 Apr 2004 00:24:57 -0000	1.42.2.1
@@ -726,6 +726,7 @@
 			 -creation_user $creation_user \
 			 -creation_ip $creation_ip \
 			 -other_type "file_storage_object" \
+			 -image_type "file_storage_object" \
 			 -title $title \
 			 -description $description \
 			 $parent_id \