scratch/output/Scratch/fr/blog/Yesod-tutorial-for-newbies/code/Echo.hs

9 lines
157 B
Haskell
Raw Normal View History

2011-12-30 16:14:57 +00:00
module Handler.Echo where
import Import
getEchoR :: Text -> Handler RepHtml
getEchoR theText = do
defaultLayout $ do
[whamlet|<h1>#{theText}|]