diff --git a/src/MdToHTML.hs b/src/MdToHTML.hs
index fa9ad1d..ad39e08 100644
--- a/src/MdToHTML.hs
+++ b/src/MdToHTML.hs
@@ -338,10 +338,6 @@ parseUListParaItem = do
   char '\n'
   return $ Document (Para firstLine : res) -- I only wrap this in a document because I want some way of converting [MdToken] to MdToken, without any overhead. There is no other reason to wrap it in a Document.
 
--- This is hacky as hell
--- parsedParas <- manyTillLazy parsePara (string "\n\n" *> choice (map char "*-+"))
--- return $ Document parsedParas -- I wrap this in a document because I want some way of converting [MdToken] to MdToken, without any overhead. There is no other reason to wrap it in a Document.
-
 -- Parse an unordered list item, which can be a line item or another list.
 parseUListItem :: ReadP MdToken
 parseUListItem = parseUListParaItem <++ parseUListLineItem <++ parseUListNested