diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Writers/Muse.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs index 33ba2b1fb..115a00f83 100644 --- a/test/Tests/Writers/Muse.hs +++ b/test/Tests/Writers/Muse.hs @@ -259,7 +259,9 @@ tests = [ testGroup "block elements" ] ] , "horizontal rule" =: horizontalRule =?> "----" - , "escape horizontal rule" =: para (text "----") =?> "<verbatim>----</verbatim>" + , "escape horizontal rule" =: para (text "----") =?> "<verbatim></verbatim>----" + , "escape long horizontal rule" =: para (text "----------") =?> "<verbatim></verbatim>----------" + , "don't escape horizontal inside paragraph" =: para (text "foo ---- bar") =?> "foo ---- bar" , "escape nonbreaking space" =: para (text "~~") =?> "<verbatim>~~</verbatim>" , testGroup "tables" [ "table without header" =: |