RST reader: make use of anyLineNewline (#3686)
This commit is contained in:
parent
03cb05f4c6
commit
753d5811e2
1 changed files with 1 additions and 2 deletions
|
@ -559,8 +559,7 @@ listLine :: Monad m => Int -> RSTParser m [Char]
|
|||
listLine markerLength = try $ do
|
||||
notFollowedBy blankline
|
||||
indentWith markerLength
|
||||
line <- anyLine
|
||||
return $ line ++ "\n"
|
||||
anyLineNewline
|
||||
|
||||
-- indent by specified number of spaces (or equiv. tabs)
|
||||
indentWith :: Monad m => Int -> RSTParser m [Char]
|
||||
|
|
Loading…
Add table
Reference in a new issue