diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 21 |
1 files changed, 9 insertions, 12 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index 6bc8c1197..91e6cc6c6 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -478,19 +478,18 @@ regularKey = try $ do -- inline -- -inline = choice [ superscript - , subscript - , escapedChar - , link - , image - , hyphens - , strong - , emph - , code +inline = choice [ link , str - , tabchar , whitespace , endline + , strong + , emph + , code + , image + , hyphens + , superscript + , subscript + , escapedChar , symbol ] <?> "inline" hyphens = try $ do @@ -530,8 +529,6 @@ subscript = interpreted "sub" >>= (return . Subscript) whitespace = many1 spaceChar >> return Space <?> "whitespace" -tabchar = tab >> return (Str "\t") - str = notFollowedBy' oneWordReference >> many1 (noneOf (specialChars ++ "\t\n ")) >>= return . Str |