diff options
Diffstat (limited to 'Handler/Home.hs')
-rw-r--r-- | Handler/Home.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Handler/Home.hs b/Handler/Home.hs index 34078d5..247e55e 100644 --- a/Handler/Home.hs +++ b/Handler/Home.hs @@ -7,7 +7,7 @@ getHomeR :: Handler RepHtml getHomeR = do people <- runDB $ selectList [] [] defaultLayout $ do - aDomId <- lift newIdent + aDomId <- newIdent setTitle "Welcome To Yesod!" $(widgetFile "homepage") |