summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-09-30 14:58:26 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-09-30 14:58:26 -0700
commit27bd6fb9773ea17359b9c4162a5b84a4ce0cb179 (patch)
tree909c3c2c8f0abbd972d1c84383405112d5445786 /src
parentd9f628fd18907d445bebc72c6aee376313e67d85 (diff)
RST reader: Removed requirement that directives begin at left margin.
This was (correctly) not in earlier releases; docutils doesn't make the requirement.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/RST.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index 6f5633e59..1efaa9231 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -469,7 +469,6 @@ bulletList = B.bulletList . compactify' <$> many1 (listItem bulletListStart)
comment :: RSTParser Blocks
comment = try $ do
- getPosition >>= guard . (==1) . sourceColumn
string ".."
skipMany1 spaceChar <|> (() <$ lookAhead newline)
notFollowedBy' directiveLabel
@@ -483,7 +482,6 @@ directiveLabel = map toLower
directive :: RSTParser Blocks
directive = try $ do
- getPosition >>= guard . (==1) . sourceColumn
string ".."
directive'
@@ -712,7 +710,6 @@ targetURI = do
substKey :: RSTParser ()
substKey = try $ do
- getPosition >>= guard . (==1) . sourceColumn
string ".."
skipMany1 spaceChar
(alt,ref) <- withRaw $ trimInlines . mconcat