aboutsummaryrefslogtreecommitdiff
path: root/test
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
parentb9602766d8a3d6c8ed31c67f49cefa8bd1a6871a (diff)
downloadpandoc-bdb84246970151dd9bbb7a0713e36707488f9d97.tar.gz
Muse writer: do not escape list markers unless preceded by space
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Writers/Muse.hs1
-rw-r--r--test/writer.muse4
2 files changed, 3 insertions, 2 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>"
diff --git a/test/writer.muse b/test/writer.muse
index abb6b63fe..c534b63b3 100644
--- a/test/writer.muse
+++ b/test/writer.muse
@@ -42,7 +42,7 @@ item.
Here’s one with a bullet. <verbatim>*</verbatim> criminey.
There should be a hard line break<br>
-<verbatim></verbatim>here.
+here.
----
@@ -245,7 +245,7 @@ Should not be a list item:
M.A. 2007
-<verbatim></verbatim>B. Williams
+B. Williams
----