Spacing change

3 weeks ago · dcbbff13cb
parent 592fad2b46
commit dcbbff13cb
1 changed files with 2 additions and 1 deletions
--- a/src/MdToHtmlTest.hs
+++ b/src/MdToHtmlTest.hs
@ -106,7 +106,8 @@ codeTests =

 imageTests =
  TestList
-    [ check_equal "Image with text" "<p>This is an image <img src=\"img.png\" alt=\"Image 1\" /></p>" (convert "This is an image ![Image 1](img.png)")
+    [ check_equal "Image with text" "<p>This is an image <img src=\"img.png\" alt=\"Image 1\"/></p>" (convert "This is an image ![Image 1](img.png)"),
+      check_equal "Image with classes" "<p>This is an image <img src=\"img.png\" alt=\"Image 1\" class=\"new-img\"/></p>" (convert "This is an image ![Image 1](img.png){.new-img}")
    ]

 figureTests =