diff --git a/yesod-bin/AddHandler.hs b/yesod-bin/AddHandler.hs
index 04ffc8cf..49fe5685 100644
--- 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: "