diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-11-18 01:44:08 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-11-18 01:44:08 +0000 |
| commit | 8d334b84cc51b16a6f010cd775f22b8072de9e7a (patch) | |
| tree | 448b80e68d08f4abe00a53e5601428f6f85cae89 | |
| parent | f4a1fa4b8db8299080bc65e6bebdc149480221c0 (diff) | |
| download | pandoc-8d334b84cc51b16a6f010cd775f22b8072de9e7a.tar.gz | |
Fixed some haddock documentation bugs in Shared.hs.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1085 788f1e2b-df1e-0410-8736-df70ead52e1b
| -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 |