aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorBen Firshman <ben@firshman.co.uk>2017-10-13 16:49:00 +0300
committerBen Firshman <ben@firshman.co.uk>2017-10-17 16:42:11 +0300
commit9046dbadb1147a4d9e2b114a2afc1a0292ef7762 (patch)
treeb9d5f2b52fbbba67f2f8153f3ca0f7258b522d75 /src/Text/Pandoc
parentd73fdbf895758095f23f798dd233d36be5966f7f (diff)
downloadpandoc-9046dbadb1147a4d9e2b114a2afc1a0292ef7762.tar.gz
Latex reader: Skip spaces in image options
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 8c6c7d0ff..b3c637748 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -758,8 +758,10 @@ keyval = try $ do
Tok _ Word key <- satisfyTok isWordTok
let isSpecSym (Tok _ Symbol t) = t `elem` [".",":","-","|","\\"]
isSpecSym _ = False
+ optional sp
val <- option [] $ do
symbol '='
+ optional sp
braced <|> (many1 (satisfyTok isWordTok <|> satisfyTok isSpecSym
<|> anyControlSeq))
optional sp