diff options
author | John MacFarlane <jgm@berkeley.edu> | 2010-12-24 13:39:27 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2010-12-24 13:39:27 -0800 |
commit | 10d85f8b0b31f117f79e53d2c50cf20d0fd0fab1 (patch) | |
tree | 1758191055a5c0abe2f4271543d99a9984d5e20a /src/Text/Pandoc/Writers/LaTeX.hs | |
parent | b950503fd82e9cc114e10860c234eb4b10d1ce27 (diff) | |
download | pandoc-10d85f8b0b31f117f79e53d2c50cf20d0fd0fab1.tar.gz |
Use functions from Text.Pandoc.Generic instead of processWith(M).
Diffstat (limited to 'src/Text/Pandoc/Writers/LaTeX.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index c6882f91e..6ed605a05 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -30,6 +30,7 @@ Conversion of 'Pandoc' format into LaTeX. -} module Text.Pandoc.Writers.LaTeX ( writeLaTeX ) where import Text.Pandoc.Definition +import Text.Pandoc.Generic import Text.Pandoc.Shared import Text.Pandoc.Templates import Text.Printf ( printf ) @@ -217,7 +218,7 @@ blockToLaTeX (Header level lst) = do txt <- inlineListToLaTeX lst' let noNote (Note _) = Str "" noNote x = x - let lstNoNotes = processWith noNote lst' + let lstNoNotes = bottomUp noNote lst' -- footnotes in sections don't work unless you specify an optional -- argument: \section[mysec]{mysec\footnote{blah}} optional <- if lstNoNotes == lst' |