wai-middleware-content-type 0.0.1 → 0.0.2
raw patch · 3 files changed
+10/−2 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- src/Network/Wai/Middleware/ContentType/Lucid.hs +0/−1
- src/Network/Wai/Middleware/ContentType/Types.hs +9/−0
- wai-middleware-content-type.cabal +1/−1
src/Network/Wai/Middleware/ContentType/Lucid.hs view
@@ -9,7 +9,6 @@ import qualified Lucid.Base as L import Control.Monad.Trans-import Control.Monad.IO.Class (MonadIO)
src/Network/Wai/Middleware/ContentType/Types.hs view
@@ -69,3 +69,12 @@ execFileExtListenerT :: Monad m => FileExtListenerT r m a -> m (FileExts r) execFileExtListenerT xs = execStateT (runFileExtListenerT xs) mempty++mapFileExts :: Monad m =>+ (a -> b)+ -> FileExtListenerT a m () -> FileExtListenerT b m ()+mapFileExts f fl = do+ femap <- lift $ execFileExtListenerT fl+ tell $ f <$> femap++
wai-middleware-content-type.cabal view
@@ -1,5 +1,5 @@ Name: wai-middleware-content-type-Version: 0.0.1+Version: 0.0.2 Author: Athan Clark <athan.clark@gmail.com> Maintainer: Athan Clark <athan.clark@gmail.com> License: BSD3