aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-10-21 06:42:00 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-10-21 06:42:00 +0300
commit8df59952bf54321a0e24a1e9104324c7ae9c153f (patch)
treea8f1c457d145d01404fe6c877e3e93c4a2d9c446 /test
parentf202279902da34dfa4f22e4e53cb0bf93d519d1e (diff)
downloadpandoc-8df59952bf54321a0e24a1e9104324c7ae9c153f.tar.gz
Muse reader: allow empty headers
Previously empty headers caused parser to terminate without parsing the rest of the document.
Diffstat (limited to 'test')
-rw-r--r--test/Tests/Readers/Muse.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 75dd4e7da..ab0579519 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -650,6 +650,13 @@ tests =
T.unlines [ "* Foo"
, "bar"
] =?> header 1 "Foo\nbar"
+ , "Empty header" =:
+ T.unlines [ "Foo"
+ , ""
+ , "* "
+ , ""
+ , "bar"
+ ] =?> para (text "Foo") <> header 1 "" <> para (text "bar")
, test (purely $ readMuse def { readerExtensions = extensionsFromList [Ext_amuse, Ext_auto_identifiers]})
"Auto identifiers"
(T.unlines [ "* foo"