add-handler: use Html instead of RepHtml

2013-04-03 16:15:16 +03:00 · 2013-04-03 16:15:16 +03:00 · 97f7979956
commit 97f7979956
parent bbe69d25a2
1 changed files with 1 additions and 1 deletions
--- a/yesod-bin/AddHandler.hs
+++ b/yesod-bin/AddHandler.hs
@ -89,7 +89,7 @@ mkHandler name pattern methods = unlines
  where
    go method =
        [ ""
-        , concat $ func : " :: " : map toArrow types ++ ["Handler RepHtml"]
+        , concat $ func : " :: " : map toArrow types ++ ["Handler Html"]
        , concat
            [ func
            , " = error \"Not yet implemented: "