git.iko.soy/typeable/pandoc
on master help sign in
RST reader: Removed requirement that directives begin at left margin.
27bd6fbJohn MacFarlane
src/Text/Pandoc/Readers/RST.hs−3
compare with master
unifiedsplit
@@ -469,7 +469,6 @@ bulletList = B.bulletList . compactify' <$> many1 (listItem bulletListStart)
469
469
470comment :: RSTParser Blocks
470comment :: RSTParser Blocks
471comment = try $ do
471comment = try $ do
472− getPosition >>= guard . (==1) . sourceColumn
473 string ".."
472 string ".."
474 skipMany1 spaceChar <|> (() <$ lookAhead newline)
473 skipMany1 spaceChar <|> (() <$ lookAhead newline)
475 notFollowedBy' directiveLabel
474 notFollowedBy' directiveLabel
@@ -483,7 +482,6 @@ directiveLabel = map toLower
483
482
484directive :: RSTParser Blocks
483directive :: RSTParser Blocks
485directive = try $ do
484directive = try $ do
486− getPosition >>= guard . (==1) . sourceColumn
487 string ".."
485 string ".."
488 directive'
486 directive'
489
487
@@ -712,7 +710,6 @@ targetURI = do
712
710
713substKey :: RSTParser ()
711substKey :: RSTParser ()
714substKey = try $ do
712substKey = try $ do
715− getPosition >>= guard . (==1) . sourceColumn
716 string ".."
713 string ".."
717 skipMany1 spaceChar
714 skipMany1 spaceChar
718 (alt,ref) <- withRaw $ trimInlines . mconcat
715 (alt,ref) <- withRaw $ trimInlines . mconcat