Fix `blanklines' documentation (#3843)

This commit is contained in:
Alexander 2017-08-08 18:44:18 +03:00 committed by John MacFarlane
parent d752f85582
commit c95cc813cc

View file

@ -398,8 +398,8 @@ cr = Doc $ singleton CarriageReturn
blankline :: Doc blankline :: Doc
blankline = Doc $ singleton (BlankLines 1) blankline = Doc $ singleton (BlankLines 1)
-- | Inserts a blank lines unless they exists already. -- | Inserts blank lines unless they exist already.
-- (@blanklines m <> blanklines n@ has the same effect as @blankline (max m n)@. -- (@blanklines m <> blanklines n@ has the same effect as @blanklines (max m n)@.
blanklines :: Int -> Doc blanklines :: Int -> Doc
blanklines n = Doc $ singleton (BlankLines n) blanklines n = Doc $ singleton (BlankLines n)