diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/OpenDocument.hs')
-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 8bd0f469e..dec394797 100644 --- a/src/Text/Pandoc/Writers/OpenDocument.hs +++ b/src/Text/Pandoc/Writers/OpenDocument.hs @@ -196,9 +196,9 @@ writeOpenDocument opts (Pandoc meta blocks) = context = defField "body" body $ defField "automatic-styles" (render' automaticStyles) $ metadata - in if writerStandalone opts - then renderTemplate' (writerTemplate opts) context - else body + in case writerTemplate opts of + Nothing -> body + Just tpl -> renderTemplate' tpl context withParagraphStyle :: WriterOptions -> String -> [Block] -> State WriterState Doc withParagraphStyle o s (b:bs) |