aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-03-24 16:23:49 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-03-24 16:25:31 +0100
commitb98a05d604ab4353c2e684beecf669b182d88906 (patch)
tree99a13ef6c2b1c796da494dee4e0089e521b81180
parent438e8686cf707cc0fe338678111a63fdc1fc5bf2 (diff)
downloadpandoc-b98a05d604ab4353c2e684beecf669b182d88906.tar.gz
LaTeX reader: be more picky about beamer angle arguments.
We now only allow them if they contain only numbers, spaces, `-`, and `,`.
-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 ae441a387..0b34be2a6 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -948,7 +948,7 @@ skipopts = skipMany rawopt
rawangle :: PandocMonad m => LP m ()
rawangle = try $ do
char '<'
- skipMany (noneOf ">")
+ skipMany (oneOf "0123456789,- \t")
char '>'
return ()