packages feed

nested-routes 7.2.0 → 7.2.1

raw patch · 2 files changed

+5/−5 lines, 2 filesdep ~wai-middleware-content-typedep ~wai-middleware-verbsdep ~wai-transformers

Dependency ranges changed: wai-middleware-content-type, wai-middleware-verbs, wai-transformers

Files

nested-routes.cabal view
@@ -1,5 +1,5 @@ Name:                   nested-routes-Version:                7.2.0+Version:                7.2.1 Author:                 Athan Clark <athan.clark@gmail.com> Maintainer:             Athan Clark <athan.clark@gmail.com> License:                BSD3@@ -54,9 +54,9 @@                       , transformers                       , tries                       , unordered-containers-                      , wai-transformers >= 0.0.5-                      , wai-middleware-content-type >= 0.4.0-                      , wai-middleware-verbs >= 0.3.0+                      , wai-transformers >= 0.0.7+                      , wai-middleware-content-type >= 0.4.1+                      , wai-middleware-verbs >= 0.3.1   Test-Suite test
src/Web/Routes/Nested/Types.hs view
@@ -119,7 +119,7 @@ --   is satisfiable (i.e. @Accept@ headers are O.K., etc.) action :: Monad m => ActionT m () -> MiddlewareT m action xs app req respond = do-  vmap <- execVerbListenerT (mapVerbs fileExtsToMiddleware xs)+  vmap <- fmap fileExtsToMiddleware <$> execVerbListenerT xs   case lookupVerb (getVerb req) vmap of     Nothing  -> app req respond     Just mid -> mid app req respond