aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers/Muse.hs
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-04-15 12:17:15 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-04-15 12:17:33 +0300
commit6be013914513d2dd8ef7f141b1e3fd59cee7d3f7 (patch)
tree6e1ac9c5f9e33fb0a4ab7612d9da3e70094e4826 /test/Tests/Readers/Muse.hs
parent34d8ffbcfc33b86766ff7229be4d8a0d1fbffb50 (diff)
downloadpandoc-6be013914513d2dd8ef7f141b1e3fd59cee7d3f7.tar.gz
Muse reader: require that comment semicolons are in the first column
Fixes #4551
Diffstat (limited to 'test/Tests/Readers/Muse.hs')
-rw-r--r--test/Tests/Readers/Muse.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 11eebbdc0..188036a09 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -521,6 +521,7 @@ tests =
, "Text after empty comment" =: ";\nfoo" =?> para "foo" -- Make sure we don't consume newline while looking for whitespace
, "Not a comment (does not start with a semicolon)" =: " ; Not a comment" =?> para (text "; Not a comment")
, "Not a comment (has no space after semicolon)" =: ";Not a comment" =?> para (text ";Not a comment")
+ , "Not a comment (semicolon not in the first column)" =: " - ; foo" =?> bulletList [para "; foo"]
]
, testGroup "Headers"
[ "Part" =: