Index: openacs-4/packages/acs-content-repository/tcl/revision-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/revision-procs.xql,v
diff -u -r1.6.2.4 -r1.6.2.5
--- openacs-4/packages/acs-content-repository/tcl/revision-procs.xql	4 Jul 2005 13:15:49 -0000	1.6.2.4
+++ openacs-4/packages/acs-content-repository/tcl/revision-procs.xql	6 Jul 2005 01:28:07 -0000	1.6.2.5
@@ -51,5 +51,14 @@
           and contetnt_type = 'content_revision'
       </querytext>
 </fullquery>
-  
+
+<fullquery name="cr_import_content.image_type_p">
+    <querytext>
+        select 1
+        from cr_content_mime_type_map
+        where mime_type = :mime_type
+        and content_type = 'image'
+    </querytext>
+</fullquery>
+
 </queryset>