@@ -309,7 +309,10 @@ options =
310 , Option "" ["xetex"]
310 , Option "" ["xetex"]
313+ UTF8.hPutStrLn stderr $ "pandoc: --xetex is deprecated. "
314+ ++ "It is no longer needed for use with XeTeX."
312− (\opt -> return opt { optXeTeX = True }))
315+ return opt { optXeTeX = True }))
313 "" -- "Format latex for processing by XeTeX"
316 "" -- "Format latex for processing by XeTeX"
315 , Option "" ["chapters"]
318 , Option "" ["chapters"]
@@ -675,7 +678,6 @@ main = do
675 , optSectionDivs = sectionDivs
678 , optSectionDivs = sectionDivs
676 , optIncremental = incremental
679 , optIncremental = incremental
677 , optOffline = offline
680 , optOffline = offline
679 , optSmart = smart
681 , optSmart = smart
680 , optHtml5 = html5
682 , optHtml5 = html5
681 , optChapters = chapters
683 , optChapters = chapters
@@ -786,7 +788,8 @@ main = do
786 stateIndentedCodeClasses = codeBlockClasses,
788 stateIndentedCodeClasses = codeBlockClasses,
787 stateApplyMacros = writerName' `notElem` ["latex", "latex+lhs"] }
789 stateApplyMacros = writerName' `notElem` ["latex", "latex+lhs"] }
791+ let writerOptions = defaultWriterOptions
789− let writerOptions = WriterOptions { writerStandalone = standalone',
792+ { writerStandalone = standalone',
790 writerTemplate = if null template
793 writerTemplate = if null template
791 then defaultTemplate
794 then defaultTemplate
792 else template,
795 else template,
@@ -798,7 +801,6 @@ main = do
798 writerHTMLMathMethod = mathMethod,
801 writerHTMLMathMethod = mathMethod,
799 writerSlideVariant = slideVariant,
802 writerSlideVariant = slideVariant,
800 writerIncremental = incremental,
803 writerIncremental = incremental,
801− writerXeTeX = xetex,
802 writerCiteMethod = citeMethod,
804 writerCiteMethod = citeMethod,
803 writerBiblioFiles = reffiles,
805 writerBiblioFiles = reffiles,
804 writerIgnoreNotes = False,
806 writerIgnoreNotes = False,