diff options
| -rw-r--r-- | src/Text/Pandoc/Shared.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index 42d9acaf0..ce07ccd24 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -228,8 +228,8 @@ isNote _ = False -- | Wrap inlines to line length, treating footnotes in a way that -- makes sense in LaTeX and ConTeXt. wrappedTeX :: Monad m - => Bool -- | Include % on line before notes. - -> ([Inline] -> m Doc) -- | Inline list writer. + => Bool + -> ([Inline] -> m Doc) -> [Inline] -> m Doc wrappedTeX includePercent listWriter sect = do @@ -250,8 +250,8 @@ wrappedTeX includePercent listWriter sect = do -- for LaTeX and ConTeXt. wrapTeXIfNeeded :: Monad m => WriterOptions - -> Bool -- | Include % on line before notes. - -> ([Inline] -> m Doc) -- | Inline list writer. + -> Bool + -> ([Inline] -> m Doc) -> [Inline] -> m Doc wrapTeXIfNeeded opts includePercent = if writerWrapText opts |