* fixed entry-adding

* temporarily removed adminHandler and merged it into tazBlog :: ServerPart Response
2012-03-14 01:36:57 +01:00 · 2012-03-14 01:36:57 +01:00 · 47e1be1f78
commit 47e1be1f78
parent 36c4d7e84e
2 changed files with 20 additions and 14 deletions
--- a/src/Blog.hs
+++ b/src/Blog.hs
@ -85,7 +85,7 @@ renderEntry (Entry{..}) = H.div ! A.class_ "innerBox" $ do
    H.div ! A.class_ "innerBoxMiddle" $ do
        H.article $ H.ul $ H.li $ do
            preEscapedText $ btext
-            preEscapedText $ mtext
+            H.p $ preEscapedText $ mtext
        H.div ! A.class_ "innerBoxComments" $ do
            H.div ! A.class_ "cHead" $ toHtml $ cHead lang -- ! A.style "font-size:large;font-weight:bold;"
            H.ul $ renderComments comments lang