aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2012-04-10 18:25:18 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2012-04-10 18:25:18 -0700
commit54c9d4348ad0b61713ab16ebf20d640f60ea5c39 (patch)
treeca636a38136388260f7af53330b81395c6cd2c25 /src/Text/Pandoc/Readers
parent66f8dc14b7aaa35b7bad31117103cc1596a27ac2 (diff)
downloadpandoc-54c9d4348ad0b61713ab16ebf20d640f60ea5c39.tar.gz
LaTeX reader: Control sequences can't be followed by a letter.
This fixes a bug where `\begingroup` was parsed as `\begin` followed by `group`.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index cc71b49f2..1c1d5cad7 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -82,7 +82,7 @@ controlSeq name = try $ do
case name of
"" -> mzero
[c] | not (isLetter c) -> string [c]
- cs -> string cs <* optional sp
+ cs -> string cs <* notFollowedBy letter <* optional sp
return name
sp :: LP ()