diff --git a/src/Handler/Entries.hs b/src/Handler/Entries.hs index 8199a3a..bd73934 100644 --- a/src/Handler/Entries.hs +++ b/src/Handler/Entries.hs @@ -9,6 +9,7 @@ import Yesod.AtomFeed ( atomLink ) import Model.Cache ( getCached ) import Model.Entry ( entryTitle ) +import Model.Markdown ( unMarkdown ) import Widget.Entry ( entryR, hEntry ) import Widget.Feed ( hFeed ) @@ -40,9 +41,12 @@ renderEntry entry = do defaultLayout $ do setTitle . toHtml . entryTitle . entityVal $ entry toWidgetHead [hamlet| + + + - + |]