Added writerTemplate and writerVariables to writerOptions.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1678 788f1e2b-df1e-0410-8736-df70ead52e1b

src/Text/Pandoc/Shared.hs

@@ -980,6 +980,8 @@ data ObfuscationMethod = NoObfuscation
 -- | Options for writers
 data WriterOptions = WriterOptions
   { writerStandalone       :: Bool   -- ^ Include header and footer
+  , writerTemplate         :: String -- ^ Template to use in standalone mode
+  , writerVariables        :: [(String, String)] -- ^ Variables to set in template
   , writerHeader           :: String -- ^ Header for the document
   , writerTitlePrefix      :: String -- ^ Prefix for HTML titles
   , writerTabStop          :: Int    -- ^ Tabstop for conversion btw spaces and tabs
@@ -1003,6 +1005,8 @@ data WriterOptions = WriterOptions
 defaultWriterOptions :: WriterOptions
 defaultWriterOptions = 
   WriterOptions { writerStandalone       = False
+                , writerTemplate         = ""
+                , writerVariables        = []
                 , writerHeader           = ""
                 , writerTitlePrefix      = ""
                 , writerTabStop          = 4

src/pandoc.hs

@@ -617,6 +617,8 @@ main = do
                    then defaultHeader
                    else customHeader) ++ csslink ++ includeHeader
   let writerOptions = WriterOptions { writerStandalone       = standalone',
+                                      writerTemplate         = "", -- TODO
+                                      writerVariables        = [], -- TODO
                                       writerHeader           = header,
                                       writerTitlePrefix      = titlePrefix,
                                       writerTabStop          = tabStop,