@@ -113,12 +113,12 @@ noteMarker = try $ do
113113 <*> many1Till (noneOf "\n\r\t ") (char ']')
114114 ]
115115
116− -- | Succeeds if the parser is at the end of a block.
116+-- | Succeeds if the parser is at the end of a block.
117117endOfBlock :: OrgParser ()
118118endOfBlock = lookAhead . try $ do
119119 void blankline <|> anyBlockStart <|> void noteMarker
120120 where
121− -- | Succeeds if there is a new block starting at this position.
121+ -- Succeeds if there is a new block starting at this position.
122122 anyBlockStart :: OrgParser ()
123123 anyBlockStart = try . choice $
124124 [ exampleLineStart