aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Writers/Muse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'test/Tests/Writers/Muse.hs')
-rw-r--r--test/Tests/Writers/Muse.hs10
1 files changed, 5 insertions, 5 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index c3a6a9d62..3c5d1511a 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -10,7 +10,7 @@ import Text.Pandoc.Arbitrary ()
import Text.Pandoc.Builder
muse :: (ToPandoc a) => a -> String
-muse = museWithOpts def{ writerWrapText = WrapNone,
+muse = museWithOpts def{ writerWrapText = WrapPreserve,
writerExtensions = extensionsFromList [Ext_amuse,
Ext_auto_identifiers] }
@@ -344,10 +344,10 @@ tests = [ testGroup "block elements"
]
, testGroup "spaces"
[ "space" =: text "a" <> space <> text "b" =?> "a b"
- , "soft break" =: text "a" <> softbreak <> text "b" =?> "a b"
- , test (museWithOpts def{ writerWrapText = WrapPreserve })
- "preserve soft break" $ text "a" <> softbreak <> text "b"
- =?> "a\nb"
+ , "soft break" =: text "a" <> softbreak <> text "b" =?> "a\nb"
+ , test (museWithOpts def{ writerWrapText = WrapNone })
+ "remove soft break" $ text "a" <> softbreak <> text "b"
+ =?> "a b"
, "line break" =: text "a" <> linebreak <> text "b" =?> "a<br>\nb"
]
, testGroup "math"