scotty 0.4.1 → 0.4.2
raw patch · 2 files changed
+3/−3 lines, 2 files
Files
- Web/Scotty/Route.hs +2/−2
- scotty.cabal +1/−1
Web/Scotty/Route.hs view
@@ -15,7 +15,7 @@ import qualified Data.CaseInsensitive as CI import Data.Conduit.Lazy (lazyConsume) import Data.Maybe (fromMaybe)-import Data.Monoid (mconcat, (<>))+import Data.Monoid (mconcat) import qualified Data.Text.Lazy as T import qualified Data.Text as TS @@ -90,7 +90,7 @@ instance (Parsable a, Action b) => Action (a -> b) where build f pat = findCapture pat >>= \ (v, pat') -> build (f v) pat' where findCapture :: RoutePattern -> ActionM (a, RoutePattern)- findCapture (Literal l) = raise $ "Lambda trying to capture a literal route: " <> l+ findCapture (Literal l) = raise $ mconcat ["Lambda trying to capture a literal route: ", l] findCapture (Capture p) = case T.span (/='/') (T.dropWhile (/=':') p) of (m,r) | T.null m -> raise "More function arguments than captures." | otherwise -> param (T.tail m) >>= \ v -> return (v, Capture r)
scotty.cabal view
@@ -1,5 +1,5 @@ Name: scotty-Version: 0.4.1+Version: 0.4.2 Synopsis: Haskell web framework inspired by Ruby's Sinatra, using WAI and Warp Homepage: https://github.com/xich/scotty Bug-reports: https://github.com/xich/scotty/issues