Index: openacs-4/packages/file-storage/tcl/file-storage-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs.xql,v
diff -u -r1.20 -r1.20.10.1
--- openacs-4/packages/file-storage/tcl/file-storage-procs.xql	14 Nov 2006 16:07:53 -0000	1.20
+++ openacs-4/packages/file-storage/tcl/file-storage-procs.xql	2 Jan 2016 20:13:30 -0000	1.20.10.1
@@ -163,15 +163,6 @@
     </querytext>
   </fullquery>
 
-<fullquery name="fs::add_file.image_type_p">
-    <querytext>
-        select 1
-        from cr_content_mime_type_map
-        where mime_type = :mime_type
-        and content_type = 'image'
-    </querytext>
-</fullquery>
-
 <fullquery name="fs::add_created_version.get_storage_type">
   <querytext>
     select storage_type from cr_items where item_id=:item_id
@@ -249,4 +240,4 @@
          </querytext>
    </fullquery>
 
-</queryset>
\ No newline at end of file
+</queryset>