diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 8 | ||||
| -rw-r--r-- | test/command/11323.md | 12 |
2 files changed, 12 insertions, 8 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index 5d5e176ee..9cec47c1f 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -1520,20 +1520,12 @@ inlineContent = choice [ whitespace , str , endline , smart - , hyphens , escapedChar , symbol ] <?> "inline content" parseInlineFromText :: PandocMonad m => Text -> RSTParser m Inlines parseInlineFromText = parseFromString' (trimInlines . mconcat <$> many inline) -hyphens :: Monad m => RSTParser m Inlines -hyphens = do - result <- many1Char (char '-') - optional endline - -- don't want to treat endline after hyphen or dash as a space - return $ B.str result - escapedChar :: Monad m => RSTParser m Inlines escapedChar = do c <- escaped anyChar if c == ' ' || c == '\n' || c == '\r' diff --git a/test/command/11323.md b/test/command/11323.md new file mode 100644 index 000000000..e2e5e1802 --- /dev/null +++ b/test/command/11323.md @@ -0,0 +1,12 @@ +``` +% pandoc -f rst +foo- + bar +^D +<dl> +<dt>foo-</dt> +<dd> +<p>bar</p> +</dd> +</dl> +``` |