From 64413b1ce26bb826a4a348ea3f5e494212a5144a Mon Sep 17 00:00:00 2001 From: Albert Krewinkel Date: Sat, 19 Nov 2016 22:24:54 +0100 Subject: Un-break Travis build Remove whitespace before function documentation The extra spaced cause problems with documentation tools and Travis tests are failing because of this. --- src/Text/Pandoc/Readers/Org/BlockStarts.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Text/Pandoc/Readers/Org') diff --git a/src/Text/Pandoc/Readers/Org/BlockStarts.hs b/src/Text/Pandoc/Readers/Org/BlockStarts.hs index 53a999307..e068f9178 100644 --- a/src/Text/Pandoc/Readers/Org/BlockStarts.hs +++ b/src/Text/Pandoc/Readers/Org/BlockStarts.hs @@ -113,12 +113,12 @@ noteMarker = try $ do <*> many1Till (noneOf "\n\r\t ") (char ']') ] - -- | Succeeds if the parser is at the end of a block. +-- | Succeeds if the parser is at the end of a block. endOfBlock :: OrgParser () endOfBlock = lookAhead . try $ do void blankline <|> anyBlockStart <|> void noteMarker where - -- | Succeeds if there is a new block starting at this position. + -- Succeeds if there is a new block starting at this position. anyBlockStart :: OrgParser () anyBlockStart = try . choice $ [ exampleLineStart -- cgit v1.2.3