diff options
| -rw-r--r-- | TODO | 2 | ||||
| -rw-r--r-- | src/Blog.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/TODO b/TODO index 3de1a19190d3..b2b76bbbb82c 100644 --- a/TODO +++ b/TODO @@ -1,3 +1,3 @@ * handle BlogErrors * add readMore link -* Twitter: http://twitter.github.com/bootstrap/index.html \ No newline at end of file +* Bootstrap: http://twitter.github.com/bootstrap/index.html diff --git a/src/Blog.hs b/src/Blog.hs index 8e4c76b621e1..48b67a93b0d8 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -110,7 +110,7 @@ renderComments comments lang = sequence_ $ map showComment comments showComment :: Comment -> Html showComment (Comment{..}) = H.li $ do H.i $ toHtml $ T.append cauthor ": " - preEscapedText $ ctext + toHtml ctext H.p ! A.class_ "tt" $ toHtml $ timeString cdate timeString t = formatTime defaultTimeLocale (cTimeFormat lang) t |