@@ -277,7 +277,12 @@ runTeXProgram verbosity program args runNumber numRuns tmpDir source = do
277277 let file' = file
278278#endif
279279 let programArgs = ["-halt-on-error", "-interaction", "nonstopmode",
280− "-output-directory", tmpDir'] ++ args ++ [file']
280+ "-output-directory", tmpDir'] ++
281+ -- see #4484, only compress images on last run:
282+ if program == "xelatex" && runNumber < numRuns
283+ then ["-output-driver", "xdvipdfmx -z0"]
284+ else []
285+ ++ args ++ [file']
281286 env' <- getEnvironment
282287 let sep = [searchPathSeparator]
283288 let texinputs = maybe (tmpDir' ++ sep) ((tmpDir' ++ sep) ++)