aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 754f379f9..284dce2bc 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -1351,10 +1351,7 @@ inlineCommands = M.fromList $
]
doTerm :: PandocMonad m => Translations.Term -> LP m Inlines
-doTerm term = do
- s <- (symbol '~' >> return (str "\160")) <|> return space
- t <- translateTerm term
- return (str t <> s)
+doTerm term = str <$> translateTerm term
ifstrequal :: PandocMonad m => LP m Inlines
ifstrequal = do