yesod-bin 1.4.3.1 → 1.4.3.2
raw patch · 3 files changed
+13/−2 lines, 3 files
Files
- AddHandler.hs +8/−1
- ChangeLog.md +4/−0
- yesod-bin.cabal +1/−1
AddHandler.hs view
@@ -107,7 +107,9 @@ , concat $ func : " :: " : map toArrow types ++ ["Handler Html"] , concat [ func- , " = error \"Not yet implemented: "+ , " "+ , concatMap toArgument types+ , "= error \"Not yet implemented: " , func , "\"" ]@@ -118,6 +120,7 @@ types = getTypes pattern toArrow t = concat [t, " -> "]+ toArgument t = concat [uncapitalize t, " "] getTypes "" = [] getTypes ('/':rest) = getTypes rest@@ -126,3 +129,7 @@ where (typ, rest') = break (== '/') rest getTypes rest = getTypes $ dropWhile (/= '/') rest++uncapitalize :: String -> String+uncapitalize (x:xs) = toLower x : xs+uncapitalize "" = ""
ChangeLog.md view
@@ -1,3 +1,7 @@+## 1.4.3.2++add-handler adds arguments too [#898](https://github.com/yesodweb/yesod/issues/898)+ ## 1.4.3 Add the minimal scaffolding
yesod-bin.cabal view
@@ -1,5 +1,5 @@ name: yesod-bin-version: 1.4.3.1+version: 1.4.3.2 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>