Drop unnecessary mime dependency

2 files changed, 0 insertions, 8 deletions

diff --git a/erebos.cabal b/erebos.cabal
index f7a4497..d895b7f 100644
--- a/erebos.cabal
+++ b/erebos.cabal
@@ -137,7 +137,6 @@ library
         hinotify >=0.4 && <0.5,
         iproute >=1.7 && <1.8,
         memory >=0.14 && <0.19,
-        mime >= 0.4 && < 0.5,
         mtl >=2.2 && <2.4,
         network >= 3.1 && <3.2,
         stm >=2.5 && <2.6,
diff --git a/src/Erebos/Storage.hs b/src/Erebos/Storage.hs
index bad1b37..2057072 100644
--- a/src/Erebos/Storage.hs
+++ b/src/Erebos/Storage.hs
@@ -61,9 +61,6 @@ module Erebos.Storage (
     beginHistory, modifyHistory,
 ) where
 
-import qualified Codec.MIME.Type as MIME
-import qualified Codec.MIME.Parse as MIME
-
 import Control.Applicative
 import Control.Arrow
 import Control.Concurrent
@@ -652,10 +649,6 @@ instance StorableText Text where
 instance StorableText [Char] where
     toText = T.pack; fromText = return . T.unpack
 
-instance StorableText MIME.Type where
-    toText = MIME.showType
-    fromText = maybe (throwError "Malformed MIME type") return . MIME.parseMIMEType
-
 
 class StorableDate a where
     toDate :: a -> ZonedTime