@@ -10,7 +10,7 @@ import Text.Pandoc.Arbitrary ()
1010import Text.Pandoc.Builder
1111
1212muse :: (ToPandoc a) => a -> String
13−muse = museWithOpts def{ writerWrapText = WrapNone,
13+muse = museWithOpts def{ writerWrapText = WrapPreserve,
1414 writerExtensions = extensionsFromList [Ext_amuse,
1515 Ext_auto_identifiers] }
1616
@@ -344,10 +344,10 @@ tests = [ testGroup "block elements"
344344 ]
345345 , testGroup "spaces"
346346 [ "space" =: text "a" <> space <> text "b" =?> "a b"
347− , "soft break" =: text "a" <> softbreak <> text "b" =?> "a b"
348− , test (museWithOpts def{ writerWrapText = WrapPreserve })
349− "preserve soft break" $ text "a" <> softbreak <> text "b"
350− =?> "a\nb"
347+ , "soft break" =: text "a" <> softbreak <> text "b" =?> "a\nb"
348+ , test (museWithOpts def{ writerWrapText = WrapNone })
349+ "remove soft break" $ text "a" <> softbreak <> text "b"
350+ =?> "a b"
351351 , "line break" =: text "a" <> linebreak <> text "b" =?> "a<br>\nb"
352352 ]
353353 , testGroup "math"