web-routes-happstack 0.23.0 → 0.23.1

raw patch · 2 files changed

+7/−8 lines, 2 filesdep ~happstack-serverdep ~web-routes

Dependency ranges changed: happstack-server, web-routes

Files

• Web/Routes/Happstack.hs +1/−2
• web-routes-happstack.cabal +6/−6

@@ -60,8 +60,7 @@ implSite_ domain approot siteSpec =     dirs (Text.unpack approot) $          do rq <- askRq-            let pathInfo = intercalate "/" (map escapeSlash (rqPaths rq))-                f        = runSite (domain `Text.append` approot) siteSpec (C.pack pathInfo)+            let f        = runSite (domain `Text.append` approot) siteSpec (map Text.pack $ rqPaths rq)             case f of               (Left parseError) -> return (Left parseError)               (Right sp)   -> Right <$> (localRq (const $ rq { rqPaths = [] }) sp)

@@ -1,5 +1,5 @@ Name:             web-routes-happstack-Version:          0.23.0+Version:          0.23.1 License:          BSD3 License-File:     LICENSE Author:           jeremy@seereason.com@@ -11,11 +11,11 @@ Build-type:       Simple  Library-        Build-Depends:    base >= 4 && < 5, -                          bytestring == 0.9.*,-                          happstack-server >= 6.0, -                          text == 0.11.*,-                          web-routes >= 0.26.1+        Build-Depends:    base             >= 4 && < 5, +                          bytestring       == 0.9.*,+                          happstack-server == 6.6.*,+                          text             == 0.11.*,+                          web-routes       >= 0.27.1         Exposed-Modules:  Web.Routes.Happstack  source-repository head