From e180a2efa6477dd08b7c6c41816d6cfdf9f24afd Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 23 Mar 2017 14:48:09 +0100 Subject: Ms writer: fixed hard line breaks. --- src/Text/Pandoc/Writers/Ms.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src') diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs index 523167349..e716b147d 100644 --- a/src/Text/Pandoc/Writers/Ms.hs +++ b/src/Text/Pandoc/Writers/Ms.hs @@ -438,8 +438,7 @@ inlineToMs opts (Math DisplayMath str) = do inlineToMs _ (RawInline f str) | f == Format "man" = return $ text str | otherwise = return empty -inlineToMs _ (LineBreak) = return $ - cr <> text ".PD 0" $$ text ".P" $$ text ".PD" <> cr +inlineToMs _ (LineBreak) = return $ cr <> text ".br" <> cr inlineToMs opts SoftBreak = handleNotes opts cr inlineToMs opts Space = handleNotes opts space inlineToMs opts (Link _ txt (src, _)) = do -- cgit v1.2.3