diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/Org.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/Org.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Org.hs b/src/Text/Pandoc/Writers/Org.hs index 49af8124a..c02a7eac2 100644 --- a/src/Text/Pandoc/Writers/Org.hs +++ b/src/Text/Pandoc/Writers/Org.hs @@ -72,8 +72,8 @@ pandocToOrg (Pandoc meta blocks) = do -- note that the notes may contain refs, so we do them first hasMath <- liftM stHasMath get let main = render colwidth $ foldl ($+$) empty $ [body, notes] - let context = setField "body" main - $ setField "math" hasMath + let context = defField "body" main + $ defField "math" hasMath $ foldl (\acc (x,y) -> setField x y acc) metadata (writerVariables opts) if writerStandalone opts |