diff --git a/web/src/Within/DBMemorial/Post.hs b/web/src/Within/DBMemorial/Post.hs
index 6636f5e..ec11248 100644
--- a/web/src/Within/DBMemorial/Post.hs
+++ b/web/src/Within/DBMemorial/Post.hs
@@ -33,4 +33,4 @@ render post =
           H.div ! A.class_ "card-content white-text" $ do
             H.span ! A.class_ "card-title" $ H.toHtml $ unpack (author post)
 
-            H.p $ writeHtml def state
+            do writeHtml def state