2 files changed, 0 insertions, 37 deletions

diff --git a/hosts/surtr/email/spm/lib/Data/CaseInsensitive/Instances.hs b/hosts/surtr/email/spm/lib/Data/CaseInsensitive/Instances.hs
deleted file mode 100644
index 56cba98a..00000000
--- a/hosts/surtr/email/spm/lib/Data/CaseInsensitive/Instances.hs
+++ /dev/null
@@ -1,19 +0,0 @@
-{-# OPTIONS_GHC -fno-warn-orphans #-}
-
-module Data.CaseInsensitive.Instances () where
-
-import Prelude
-
-import Data.CaseInsensitive (CI)
-import qualified Data.CaseInsensitive as CI
-
-import Servant.API.ContentTypes
-
-import Data.Aeson
-
-
-instance MimeRender PlainText a => MimeRender PlainText (CI a) where
-  mimeRender p = mimeRender p . CI.original
-
-instance ToJSON a => ToJSON (CI a) where
-  toJSON = toJSON . CI.original
diff --git a/hosts/surtr/email/spm/lib/Data/UUID/Instances.hs b/hosts/surtr/email/spm/lib/Data/UUID/Instances.hs
deleted file mode 100644
index 335937d8..00000000
--- a/hosts/surtr/email/spm/lib/Data/UUID/Instances.hs
+++ /dev/null
@@ -1,18 +0,0 @@
-{-# OPTIONS_GHC -fno-warn-orphans #-}
-
-module Data.UUID.Instances () where
-
-import Prelude
-import Data.UUID (UUID)
-import qualified Data.UUID as UUID
-import Servant.API.ContentTypes
-
-
-instance MimeRender PlainText UUID where
-  mimeRender p = mimeRender p . UUID.toText
-
-instance MimeRender JSON UUID where
-  mimeRender p = mimeRender p . UUID.toText
-
-instance MimeRender OctetStream UUID where
-  mimeRender p = mimeRender p . UUID.toByteString