From 0ab8670a0eb52b5da2bef64b2cc1917e4d5ddb54 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Sat, 12 Aug 2017 13:40:28 -0700 Subject: LaTeX reader: Fixed space after \figurename etc. --- src/Text/Pandoc/Readers/LaTeX.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'src/Text/Pandoc') 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 -- cgit v1.2.3