aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Writers/Ms.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Ms.hs b/src/Text/Pandoc/Writers/Ms.hs
index e4daa1be0..534f26a5a 100644
--- a/src/Text/Pandoc/Writers/Ms.hs
+++ b/src/Text/Pandoc/Writers/Ms.hs
@@ -97,8 +97,8 @@ pandocToMs opts (Pandoc meta blocks) = do
else Nothing
let render' = render colwidth
metadata <- metaToJSON opts
- (fmap (render colwidth) . blockListToMs opts)
- (fmap (render colwidth) . inlineListToMs' opts)
+ (fmap render' . blockListToMs opts)
+ (fmap render' . inlineListToMs' opts)
meta
body <- blockListToMs opts blocks
let main = render' body