summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2015-02-07 20:31:33 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2015-02-07 20:31:33 -0800
commit20b3dea3fe6f531cdec2f2fe6f7552912cb99feb (patch)
tree292781565d8d3e6c54f99d8b704d4d8586552689 /src
parent0a1cd2531243d2fd82e442448602705ac9174873 (diff)
parentbd7cf8dbd5b2d7db662a5f961cb2863fd2e73f14 (diff)
Merge branch 'timtylin-patch/fixTexinfoWrap'
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/Texinfo.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Texinfo.hs b/src/Text/Pandoc/Writers/Texinfo.hs
index cf736ebda..792718e95 100644
--- a/src/Text/Pandoc/Writers/Texinfo.hs
+++ b/src/Text/Pandoc/Writers/Texinfo.hs
@@ -422,7 +422,7 @@ inlineToTexinfo (RawInline f str)
| f == "texinfo" = return $ text str
| otherwise = return empty
inlineToTexinfo (LineBreak) = return $ text "@*" <> cr
-inlineToTexinfo Space = return $ char ' '
+inlineToTexinfo Space = return space
inlineToTexinfo (Link txt (src@('#':_), _)) = do
contents <- escapeCommas $ inlineListToTexinfo txt