diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-03-23 14:48:09 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-23 14:48:09 +0100 |
| commit | e180a2efa6477dd08b7c6c41816d6cfdf9f24afd (patch) | |
| tree | cd6ac6a630159e6411465f18a2e535244158ea6b /src/Text | |
| parent | dd1ac8f48fdb4cf29c924690ecbed4557519b444 (diff) | |
| download | pandoc-e180a2efa6477dd08b7c6c41816d6cfdf9f24afd.tar.gz | |
Ms writer: fixed hard line breaks.
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/Ms.hs | 3 |
1 files changed, 1 insertions, 2 deletions
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 |