aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2015-02-07 20:28:56 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2015-02-07 20:28:56 -0800
commitbd7cf8dbd5b2d7db662a5f961cb2863fd2e73f14 (patch)
tree292781565d8d3e6c54f99d8b704d4d8586552689 /src/Text/Pandoc
parent0a1cd2531243d2fd82e442448602705ac9174873 (diff)
parent858ebf99ebe809685ca42fced374ceeaea3a832c (diff)
downloadpandoc-bd7cf8dbd5b2d7db662a5f961cb2863fd2e73f14.tar.gz
Merge branch 'patch/fixTexinfoWrap' of https://github.com/timtylin/scholdoc into timtylin-patch/fixTexinfoWrap
Conflicts: src/Text/Pandoc/Writers/Texinfo.hs
Diffstat (limited to 'src/Text/Pandoc')
-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