diff options
| author | David Waern <david.waern@gmail.com> | 2009-11-14 12:10:47 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2009-11-14 12:10:47 +0000 |
| commit | d3dcfadaa31815dc6ad1d45adf67d2386e33091c (patch) | |
| tree | 45e2ad34e0fec7757954509ab6c81ecb4cb78edc /src/Haddock/Interface/LexParseRn.hs | |
| parent | e7be4057a769c79969f762e83c6fc8c751ad6533 (diff) | |
hlint police
Diffstat (limited to 'src/Haddock/Interface/LexParseRn.hs')
| -rw-r--r-- | src/Haddock/Interface/LexParseRn.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Haddock/Interface/LexParseRn.hs b/src/Haddock/Interface/LexParseRn.hs index 04464e77..026e753c 100644 --- a/src/Haddock/Interface/LexParseRn.hs +++ b/src/Haddock/Interface/LexParseRn.hs @@ -58,8 +58,7 @@ lexParseRnHaddockComment hty gre (HsDocString fs) = do Nothing -> do tell ["doc comment parse failed: "++str] return Nothing - Just doc -> do - return (Just (rnHsDoc gre doc)) + Just doc -> return (Just (rnHsDoc gre doc)) #else lexParseRnHaddockComment _ _ doc = return (Just doc) #endif |