diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-06-18 10:54:56 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-06-18 10:54:56 -0700 |
| commit | f656de23cc8b73a08264886dfb91060f936f0d70 (patch) | |
| tree | 2dddc0a98e80d5f44309ef716e3a2ecda67d7d06 /haddock-library/src/Documentation/Haddock/Parser.hs | |
| parent | e3f52bff799e811d8b8a411be091a74979edc5fb (diff) | |
Fixed haddock warnings.
Diffstat (limited to 'haddock-library/src/Documentation/Haddock/Parser.hs')
| -rw-r--r-- | haddock-library/src/Documentation/Haddock/Parser.hs | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/haddock-library/src/Documentation/Haddock/Parser.hs b/haddock-library/src/Documentation/Haddock/Parser.hs index 860271e1..37bf4ca7 100644 --- a/haddock-library/src/Documentation/Haddock/Parser.hs +++ b/haddock-library/src/Documentation/Haddock/Parser.hs @@ -342,11 +342,9 @@ takeNonEmptyLine = do -- | Blocks of text of the form: -- --- @ --- > foo --- > bar --- > baz --- @ +-- >> foo +-- >> bar +-- >> baz -- birdtracks :: Parser (DocH mod a) birdtracks = DocCodeBlock . DocString . intercalate "\n" . stripSpace <$> many1 line @@ -409,7 +407,7 @@ property :: Parser (DocH mod a) property = DocProperty . strip . decodeUtf8 <$> ("prop>" *> takeWhile1 (/= '\n')) -- | --- Paragraph level codeblock. Anything between the two delimiting @ is parsed +-- Paragraph level codeblock. Anything between the two delimiting \@ is parsed -- for markup. codeblock :: Parser (DocH mod Identifier) codeblock = |