diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index 5f7d7bcb6..4ab60c77e 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -853,7 +853,7 @@ inline = choice [ whitespace , strong , emph , code - , image + , subst , superscript , subscript , math @@ -1018,9 +1018,8 @@ autoEmail = do autoLink :: RSTParser Inlines autoLink = autoURI <|> autoEmail --- For now, we assume that all substitution references are for images. -image :: RSTParser Inlines -image = try $ do +subst :: RSTParser Inlines +subst = try $ do (_,ref) <- withRaw $ enclosed (char '|') (char '|') inline state <- getState let substTable = stateSubstitutions state |