aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Writers/Muse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'test/Tests/Writers/Muse.hs')
-rw-r--r--test/Tests/Writers/Muse.hs4
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" =: