diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index 6af32e7e5..4d848d55b 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -141,7 +141,10 @@ pandocToMarkdown opts (Pandoc (Meta title authors date) blocks) = do
   let context  = writerVariables opts ++
                  [ ("toc", render colwidth toc)
                  , ("body", main)
+                 , ("title", render Nothing title')
+                 , ("date", render Nothing date')
                  ] ++
+                 [ ("author", render Nothing a) | a <- authors' ] ++
                  [ ("titleblock", render colwidth titleblock)
                    | not (null title && null authors && null date) ]
   if writerStandalone opts