web-routes-wai 0.19.1 → 0.19.2
raw patch · 2 files changed
+2/−2 lines, 2 files
Files
- Web/Routes/Wai.hs +1/−1
- web-routes-wai.cabal +1/−1
Web/Routes/Wai.hs view
@@ -39,7 +39,7 @@ handleWaiRouteT_ :: (url -> String) -> (String -> Either String url) -> String -> (url -> Request -> RouteT url IO Response) -> Application handleWaiRouteT_ toPathInfo fromPathInfo approot handler =- handleWai_ toPathInfo fromPathInfo approot (\toPathInfo' url request -> runRouteT (handler url request) toPathInfo') + handleWai_ toPathInfo fromPathInfo approot (\toPathInfo' url request -> unRouteT (handler url request) toPathInfo') handleWaiRouteT :: (PathInfo url) => String -> (url -> Request -> RouteT url IO Response) -> Application handleWaiRouteT approot handler = handleWaiRouteT_ toPathInfo fromPathInfo approot handler
web-routes-wai.cabal view
@@ -1,5 +1,5 @@ Name: web-routes-wai-Version: 0.19.1+Version: 0.19.2 License: BSD3 License-File: LICENSE Author: jeremy@seereason.com