diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/AsciiDoc.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/AsciiDoc.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/AsciiDoc.hs b/src/Text/Pandoc/Writers/AsciiDoc.hs index 60879d54f..83acdcfcd 100644 --- a/src/Text/Pandoc/Writers/AsciiDoc.hs +++ b/src/Text/Pandoc/Writers/AsciiDoc.hs @@ -84,10 +84,10 @@ pandocToAsciiDoc opts (Pandoc meta blocks) = do _ -> metadata body <- blockListToAsciiDoc opts blocks let main = render colwidth body - let context = setField "body" main - $ setField "toc" + let context = defField "body" main + $ defField "toc" (writerTableOfContents opts && writerStandalone opts) - $ setField "titleblock" titleblock + $ defField "titleblock" titleblock $ foldl (\acc (x,y) -> setField x y acc) metadata' (writerVariables opts) if writerStandalone opts |