Implemented inline images and framed images

[Rakka.git] / tests / WikiParserTest.hs

diff --git a/tests/WikiParserTest.hs b/tests/WikiParserTest.hs
index 026dcaa87fabde522f7864c80d5430172583d8e3..9bfdc4efa4538e8342169c1c903fba99e15184f2 100644 (file)
--- a/tests/WikiParserTest.hs
+++ b/tests/WikiParserTest.hs
@@ -326,6 +326,11 @@ testData = [ (parseWiki ""
               (Right [ BlockCmd (BlockCommand "div" []
                                  [ Paragraph [Text "foo"] ]) ]))
 
+           , (parseWiki "<div>\nbar\n</div>"
+              ~?=
+              (Right [ BlockCmd (BlockCommand "div" []
+                                 [ Paragraph [Text "bar"] ]) ]))
+
            , (parseWiki "<div><!-- comment --></div>"
               ~?=
               (Right [ BlockCmd (BlockCommand "div" [] []) ]))