preamble 0.0.43 → 0.0.44

raw patch · 2 files changed

+8/−1 lines, 2 files

Files

• preamble.cabal +1/−1
• src/Preamble/Types/Orphan.hs +7/−0

@@ -1,5 +1,5 @@ name: preamble-version: 0.0.43+version: 0.0.44 cabal-version: >=1.22 build-type: Simple license: MIT

@@ -1,4 +1,5 @@ {-# OPTIONS  -fno-warn-orphans #-}+{-# LANGUAGE CPP               #-} {-# LANGUAGE NoImplicitPrelude #-}  -- | Various orphans.@@ -7,16 +8,22 @@  import Control.Monad.Random import Control.Monad.Trans.Resource+#if MIN_VERSION_aeson(1,1,0)+#else import Data.Aeson import Data.UUID+#endif import Preamble.Prelude +#if MIN_VERSION_aeson(1,1,0)+#else instance ToJSON UUID where   toJSON = toJSON . toText  instance FromJSON UUID where   parseJSON (String s) = maybe mzero return $ fromText s   parseJSON _ = mzero+#endif  instance MonadRandom m => MonadRandom (ResourceT m) where   getRandom   = lift getRandom