aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2015-01-11 22:14:56 +0000
committerMatthew Pickering <matthewtpickering@gmail.com>2015-01-11 22:14:56 +0000
commit519b80f06dc83e3b6957b444f808b68514043bbf (patch)
tree2cea0ae5c0db9e2cdfce275f2c3c0bb2b031a7d2
parente2d86dfe286085cc33b513b17444e846fae0ce30 (diff)
parent6aa41b86d01f6120a3c0e8c63578b626f174251d (diff)
downloadpandoc-519b80f06dc83e3b6957b444f808b68514043bbf.tar.gz
Merge pull request #1870 from mb21/fix-xelatex-recommendation
Don't log "Try xelatex..." if xelatex already in use
-rw-r--r--src/Text/Pandoc/PDF.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Text/Pandoc/PDF.hs b/src/Text/Pandoc/PDF.hs
index 75bd489d1..ea6699ac4 100644
--- a/src/Text/Pandoc/PDF.hs
+++ b/src/Text/Pandoc/PDF.hs
@@ -146,8 +146,9 @@ tex2pdf' verbose tmpDir program source = do
let logmsg = extractMsg log'
let extramsg =
case logmsg of
- x | "! Package inputenc Error" `BC.isPrefixOf` x ->
- "\nTry running pandoc with --latex-engine=xelatex."
+ x | ("! Package inputenc Error" `BC.isPrefixOf` x
+ && program /= "xelatex")
+ -> "\nTry running pandoc with --latex-engine=xelatex."
_ -> ""
return $ Left $ logmsg <> extramsg
(ExitSuccess, Nothing) -> return $ Left ""