Index: openacs-4/packages/acs-content-repository/tcl/content-revision-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-revision-procs.xql,v
diff -u -N -r1.2 -r1.2.14.1
--- openacs-4/packages/acs-content-repository/tcl/content-revision-procs.xql 31 May 2006 13:42:30 -0000 1.2
+++ openacs-4/packages/acs-content-repository/tcl/content-revision-procs.xql 27 Oct 2016 18:02:00 -0000 1.2.14.1
@@ -11,7 +11,13 @@
- select storage_type from cr_items where item_id=:item_id
+ select storage_type from cr_items where item_id=:item_id
+
+
+
+ select exists(select 1 from cr_mime_types where mime_type = :mime_type)
+
+