diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
index d550482fe..78de1b17c 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -56,7 +56,8 @@ pandocToLaTeX options (Pandoc (Meta title authors date) blocks) = do
   titletext <- if null title
                   then return ""
                   else liftM render $ inlineListToLaTeX title
-  let context  = [ ("before", writerIncludeBefore options)
+  let context  = writerVariables options ++
+                 [ ("before", writerIncludeBefore options)
                  , ("after", writerIncludeAfter options)
                  , ("toc", if writerTableOfContents options then "yes" else "")
                  , ("body", main)