From 1ce7c38bc415630c5e84e44d69fbdcf92873f8df Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Thu, 26 Jan 2012 11:52:25 -0800
Subject: LaTeX reader: Handle \@.
---
src/Text/Pandoc/Readers/LaTeX.hs | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
(limited to 'src/Text/Pandoc/Readers')
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 708aa58c1..26db25208 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -691,13 +691,16 @@ unescapedChar :: GenParser Char st Inline
unescapedChar = oneOf "`$^&_#{}[]|<>" >>= return . (\c -> Str [c])
specialChar :: GenParser Char st Inline
-specialChar = choice [ spacer, interwordSpace,
+specialChar = choice [ spacer, interwordSpace, sentenceEnd,
backslash, tilde, caret,
bar, lt, gt, doubleQuote ]
spacer :: GenParser Char st Inline
spacer = try (string "\\,") >> return (Str "")
+sentenceEnd :: GenParser Char st Inline
+sentenceEnd = try (string "\\@") >> return (Str "")
+
interwordSpace :: GenParser Char st Inline
interwordSpace = try (string "\\ ") >> return (Str "\160")
--
cgit v1.2.3