diff --git a/src/MdToHtmlTest.hs b/src/MdToHtmlTest.hs
index a0211a1..d2df2cf 100644
--- a/src/MdToHtmlTest.hs
+++ b/src/MdToHtmlTest.hs
@@ -4,7 +4,7 @@ import MdToHTML
 import Test.HUnit
 
 check_equal :: String -> String -> String -> Test
-check_equal desc expected actual = TestCase (assertEqual desc expected actual)
+check_equal desc expected actual = TestCase (assertEqual desc expected (filter (/= '\n') actual))
 
 convert :: String -> String
 convert md = show $ leftmostLongestParse parseDocument md