ox-latex: Remove all temporary files when compiling release_8.2.2
authorNicolas Goaziou <n.goaziou@gmail.com>
Fri, 8 Nov 2013 07:54:52 +0000 (08:54 +0100)
committerNicolas Goaziou <n.goaziou@gmail.com>
Fri, 8 Nov 2013 07:54:52 +0000 (08:54 +0100)
* lisp/ox-latex.el (org-latex-compile): Remove all numbered temporary
  files after compiling.

lisp/ox-latex.el

index 339f5a3..1da7f9b 100644 (file)
@@ -2852,9 +2852,13 @@ Return PDF file name or an error if it couldn't be produced."
          ;; Else remove log files, when specified, and signal end of
          ;; process to user, along with any error encountered.
          (when (and (not snippet) org-latex-remove-logfiles)
-           (dolist (ext org-latex-logfiles-extensions)
-             (let ((file (concat out-dir base-name "." ext)))
-               (when (file-exists-p file) (delete-file file)))))
+           (dolist (file (directory-files
+                          out-dir t
+                          (concat (regexp-quote base-name)
+                                  "\\(?:\\.[0-9]+\\)?"
+                                  "\\."
+                                  (regexp-opt org-latex-logfiles-extensions))))
+             (delete-file file)))
          (message (concat "Process completed"
                           (if (not errors) "."
                             (concat " with errors: " errors)))))