wai-middleware-content-type 0.0.3.1 → 0.0.3.2
raw patch · 3 files changed
+41/−6 lines, 3 filesdep +exceptionsdep +mmorphdep +monad-controldep ~basePVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
Dependencies added: exceptions, mmorph, monad-control, monad-logger, resourcet, transformers-base
Dependency ranges changed: base
API changes (from Hackage documentation)
+ Network.Wai.Middleware.ContentType.Types: instance (Control.Monad.Trans.Resource.Internal.MonadResource m, Control.Monad.Base.MonadBase GHC.Types.IO m) => Control.Monad.Trans.Resource.Internal.MonadResource (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Base.MonadBase b m => Control.Monad.Base.MonadBase b (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Catch.MonadCatch m => Control.Monad.Catch.MonadCatch (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Catch.MonadMask m => Control.Monad.Catch.MonadMask (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Catch.MonadThrow m => Control.Monad.Catch.MonadThrow (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Cont.Class.MonadCont m => Control.Monad.Cont.Class.MonadCont (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Error.Class.MonadError e m => Control.Monad.Error.Class.MonadError e (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Fix.MonadFix m => Control.Monad.Fix.MonadFix (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Logger.MonadLogger m => Control.Monad.Logger.MonadLogger (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Morph.MFunctor (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Reader.Class.MonadReader r' m => Control.Monad.Reader.Class.MonadReader r' (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Trans.Control.MonadBaseControl b m => Control.Monad.Trans.Control.MonadBaseControl b (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Trans.Control.MonadTransControl (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r)
+ Network.Wai.Middleware.ContentType.Types: instance Control.Monad.Writer.Class.MonadWriter w m => Control.Monad.Writer.Class.MonadWriter w (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance GHC.Base.MonadPlus m => GHC.Base.Alternative (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
+ Network.Wai.Middleware.ContentType.Types: instance GHC.Base.MonadPlus m => GHC.Base.MonadPlus (Network.Wai.Middleware.ContentType.Types.FileExtListenerT r m)
Files
- src/Network/Wai/Middleware/ContentType/ByteString.hs +0/−1
- src/Network/Wai/Middleware/ContentType/Types.hs +33/−3
- wai-middleware-content-type.cabal +8/−2
src/Network/Wai/Middleware/ContentType/ByteString.hs view
@@ -9,7 +9,6 @@ import qualified Network.Wai.Util as U import qualified Data.ByteString.Lazy as B-import Data.Map import Control.Monad.Trans (lift) import Control.Monad.IO.Class
src/Network/Wai/Middleware/ContentType/Types.hs view
@@ -1,10 +1,12 @@ {-# LANGUAGE- DeriveFunctor+ TypeFamilies+ , DeriveFunctor , FlexibleContexts , DeriveTraversable , OverloadedStrings , FlexibleInstances , StandaloneDeriving+ , UndecidableInstances , MultiParamTypeClasses , GeneralizedNewtypeDeriving #-}@@ -26,8 +28,18 @@ import Data.Maybe (fromMaybe) import Data.Monoid import Data.Foldable-import Control.Monad.Trans+import Control.Applicative+import Control.Monad.Base+import Control.Monad.Catch+import Control.Monad.Cont+import Control.Monad.Except+import Control.Monad.Trans.Control hiding (embed)+import Control.Monad.Trans.Resource import Control.Monad.State+import Control.Monad.Writer hiding (tell)+import Control.Monad.Reader+import Control.Monad.Logger+import Control.Monad.Morph tell :: (Monoid w, MonadState w m) => w -> m ()@@ -78,7 +90,25 @@ newtype FileExtListenerT r m a = FileExtListenerT { runFileExtListenerT :: StateT (FileExts r) m a }- deriving (Functor, Applicative, Monad, MonadIO, MonadTrans, MonadState (FileExts r))+ deriving ( Functor, Applicative, Alternative, Monad, MonadFix, MonadPlus, MonadIO+ , MonadTrans, MonadReader r', MonadWriter w, MonadState (FileExts r)+ , MonadCont, MonadError e, MonadBase b, MonadThrow, MonadCatch+ , MonadMask, MonadLogger, MFunctor+ )++deriving instance (MonadResource m, MonadBase IO m) => MonadResource (FileExtListenerT r m)++instance MonadTransControl (FileExtListenerT r) where+ type StT (FileExtListenerT r) a = StT (StateT (FileExts r)) a+ liftWith = defaultLiftWith FileExtListenerT runFileExtListenerT+ restoreT = defaultRestoreT FileExtListenerT++instance ( MonadBaseControl b m+ ) => MonadBaseControl b (FileExtListenerT r m) where+ type StM (FileExtListenerT r m) a = ComposeSt (FileExtListenerT r) m a+ liftBaseWith = defaultLiftBaseWith+ restoreM = defaultRestoreM+ execFileExtListenerT :: Monad m => FileExtListenerT r m a -> m (FileExts r) execFileExtListenerT xs = execStateT (runFileExtListenerT xs) mempty
wai-middleware-content-type.cabal view
@@ -1,5 +1,5 @@ Name: wai-middleware-content-type-Version: 0.0.3.1+Version: 0.0.3.2 Author: Athan Clark <athan.clark@gmail.com> Maintainer: Athan Clark <athan.clark@gmail.com> License: BSD3@@ -26,20 +26,26 @@ Network.Wai.Middleware.ContentType.Lucius Network.Wai.Middleware.ContentType.Text Network.Wai.Middleware.ContentType.Middleware- Build-Depends: base >= 4.6 && < 5+ Build-Depends: base >= 4.8 && < 5 , aeson , blaze-builder , blaze-html , bytestring , clay , containers+ , exceptions , http-media , http-types , lucid+ , mmorph+ , monad-control+ , monad-logger , mtl+ , resourcet , shakespeare , text , transformers+ , transformers-base , wai , wai-transformers >= 0.0.3 , wai-util