From 9b49ec7bbfd07c8b661e3f53bbed62325e26ab44 Mon Sep 17 00:00:00 2001
From: Alan Stanley <astanley@upei.ca>
Date: Fri, 12 Sep 2014 10:28:41 -0300
Subject: [PATCH] allwed for existing non-standard mimetype

---
 includes/datastream.version.inc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/includes/datastream.version.inc b/includes/datastream.version.inc
index be08fb38..e97640d4 100644
--- a/includes/datastream.version.inc
+++ b/includes/datastream.version.inc
@@ -282,7 +282,11 @@ function islandora_datastream_version_replace_form($form, &$form_state, Abstract
   $form_state['dsid'] = $datastream->id;
   $form_state['object'] = $object;
   $datastream_mime_map = islandora_get_object_extensions($object);
+  $current_mime = $datastream->mimetype;
   $mimes = $datastream_mime_map[$datastream->id]['mime'];
+  if (!in_array($current_mime, $mimes)) {
+    $mimes[] = $current_mime;
+  }
   $extensions = array();
   foreach ($mimes as $mime) {
     $extensions = array_merge($extensions, islandora_get_extensions_for_mimetype($mime));