aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Writers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-09-16 20:59:59 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-09-16 21:05:57 +0300
commit71776661cd0ceceb896ce668b99f1df373f6e1b0 (patch)
treeb0c7fa2334aed54a6c6cfe4079e7f3dd109dda51 /test/Tests/Writers
parent18fed9f586ad6a940bdbd62c8a608c7169080800 (diff)
downloadpandoc-71776661cd0ceceb896ce668b99f1df373f6e1b0.tar.gz
Muse writer: replace newlines in strings with spaces
Diffstat (limited to 'test/Tests/Writers')
-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 614e9dbc6..f7287d57d 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -375,6 +375,7 @@ tests = [ testGroup "block elements"
, "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"
+ , "escape newlines" =: str "foo\nbar" =?> "foo bar"
]
, testGroup "emphasis"
[ "emphasis" =: emph (text "foo") =?> "*foo*"