aboutsummaryrefslogtreecommitdiff
path: root/test/Tests
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-03-31 22:44:24 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-03-31 23:40:31 +0300
commitbdb84246970151dd9bbb7a0713e36707488f9d97 (patch)
tree66d0a763e546512de3986e2a379fe187c8b0ec03 /test/Tests
parentb9602766d8a3d6c8ed31c67f49cefa8bd1a6871a (diff)
downloadpandoc-bdb84246970151dd9bbb7a0713e36707488f9d97.tar.gz
Muse writer: do not escape list markers unless preceded by space
Diffstat (limited to 'test/Tests')
-rw-r--r--test/Tests/Writers/Muse.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index c1bec1ba2..88d2db8cf 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -324,6 +324,7 @@ tests = [ testGroup "block elements"
, "escape ; to avoid accidental comments" =: text "; foo" =?> "<verbatim></verbatim>; foo"
, "escape ; after softbreak" =: text "foo" <> softbreak <> text "; bar" =?> "foo\n<verbatim></verbatim>; bar"
, "escape ; after linebreak" =: text "foo" <> linebreak <> text "; bar" =?> "foo<br>\n<verbatim></verbatim>; bar"
+ , "do not escape ; inside paragraph" =: text "foo ; bar" =?> "foo ; bar"
]
, testGroup "emphasis"
[ "emph" =: emph (text "foo") =?> "<em>foo</em>"