diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-01-16 21:10:34 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-25 17:07:43 +0100 |
| commit | 73f57daf69d4f1dbeb4b2574eb4e85280293ed67 (patch) | |
| tree | 8536b13888540c0470bf99074bff38460ec22310 | |
| parent | 00f654962967c393ee3a97ce38e085a110589da4 (diff) | |
Fixed shadowing warnings.
| -rw-r--r-- | src/Text/Pandoc/Writers/OpenDocument.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/OpenDocument.hs b/src/Text/Pandoc/Writers/OpenDocument.hs index 1a758193a..71e599e09 100644 --- a/src/Text/Pandoc/Writers/OpenDocument.hs +++ b/src/Text/Pandoc/Writers/OpenDocument.hs @@ -35,7 +35,7 @@ import Text.Pandoc.Options import Text.Pandoc.XML import Text.Pandoc.Shared (linesToPara) import Text.Pandoc.Templates (renderTemplate') -import Text.Pandoc.Readers.Odt.StyleReader +import Text.Pandoc.Readers.Odt.StyleReader hiding (listStyle) import Text.Pandoc.Writers.Math import Text.Pandoc.Pretty import Text.Printf ( printf ) @@ -392,9 +392,9 @@ blockToOpenDocument o bs paragraph inlines = inParagraphTags =<< inlinesToOpenDocument o inlines paraWithBreak :: PandocMonad m => ParaBreak -> [Inline] -> OD m Doc - paraWithBreak breakKind bs = do + paraWithBreak breakKind bs' = do pn <- paraBreakStyle breakKind - withParagraphStyle o ("P" ++ show pn) [Para bs] + withParagraphStyle o ("P" ++ show pn) [Para bs'] colHeadsToOpenDocument :: PandocMonad m => WriterOptions -> String -> [String] -> [[Block]] |