Deprecate hamletToRepHtml

This commit is contained in:
Michael Snoyman 2013-05-19 15:28:38 +03:00
parent 0ace941117
commit 44c5b03a6e

View File

@ -707,7 +707,7 @@ redirectToPost :: (MonadHandler m, RedirectUrl (HandlerSite m) url)
-> m a
redirectToPost url = do
urlText <- toTextUrl url
hamletToRepHtml [hamlet|
giveUrlRenderer [hamlet|
$newline never
$doctype 5
@ -724,6 +724,7 @@ $doctype 5
-- | Wraps the 'Content' generated by 'hamletToContent' in a 'RepHtml'.
hamletToRepHtml :: MonadHandler m => HtmlUrl (Route (HandlerSite m)) -> m Html
hamletToRepHtml = giveUrlRenderer
{-# DEPRECATED hamletToRepHtml "Use giveUrlRenderer instead" #-}
-- | Provide a URL rendering function to the given function and return the
-- result. Useful for processing Shakespearean templates.