git.iko.soy/typeable/pandoc
on master help sign in
Fixed shadowing warnings.
73f57daJohn MacFarlane
src/Text/Pandoc/Writers/OpenDocument.hs+3−3
@@ -35,7 +35,7 @@ import Text.Pandoc.Options
35import Text.Pandoc.XML
35import Text.Pandoc.XML
36import Text.Pandoc.Shared (linesToPara)
36import Text.Pandoc.Shared (linesToPara)
37import Text.Pandoc.Templates (renderTemplate')
37import Text.Pandoc.Templates (renderTemplate')
38−import Text.Pandoc.Readers.Odt.StyleReader
38+import Text.Pandoc.Readers.Odt.StyleReader hiding (listStyle)
39import Text.Pandoc.Writers.Math
39import Text.Pandoc.Writers.Math
40import Text.Pandoc.Pretty
40import Text.Pandoc.Pretty
41import Text.Printf ( printf )
41import Text.Printf ( printf )
@@ -392,9 +392,9 @@ blockToOpenDocument o bs
392 paragraph inlines = inParagraphTags =<< inlinesToOpenDocument o inlines
392 paragraph inlines = inParagraphTags =<< inlinesToOpenDocument o inlines
393
393
394 paraWithBreak :: PandocMonad m => ParaBreak -> [Inline] -> OD m Doc
394 paraWithBreak :: PandocMonad m => ParaBreak -> [Inline] -> OD m Doc
395− paraWithBreak breakKind bs = do
395+ paraWithBreak breakKind bs' = do
396 pn <- paraBreakStyle breakKind
396 pn <- paraBreakStyle breakKind
397− withParagraphStyle o ("P" ++ show pn) [Para bs]
397+ withParagraphStyle o ("P" ++ show pn) [Para bs']
398
398
399colHeadsToOpenDocument :: PandocMonad m
399colHeadsToOpenDocument :: PandocMonad m
400 => WriterOptions -> String -> [String] -> [[Block]]
400 => WriterOptions -> String -> [String] -> [[Block]]