diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-05-18 01:13:09 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-05-18 01:13:09 +0000 |
| commit | adf6b7f952928831a7597ff6ab64a9acc9e8f060 (patch) | |
| tree | cfd603b8d57565c89fb10b4babbaa7267973f80f /lisp/textmodes | |
| parent | f1812d0ae670e6d4337220b86463a3e6dd0388c7 (diff) | |
| download | emacs-adf6b7f952928831a7597ff6ab64a9acc9e8f060.tar.gz | |
(tex-delete-last-temp-files): Don't fail on non-existent directory.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index b9c450c859f..6803d21c50e 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -884,9 +884,10 @@ evaluates to a command string." If NOT-ALL is non-nil, save the `.dvi' file." (if tex-last-temp-file (let* ((dir (file-name-directory tex-last-temp-file)) - (list (file-name-all-completions - (file-name-nondirectory tex-last-temp-file) dir))) - (while list + (list (and (file-directory-p dir) + (file-name-all-completions + (file-name-nondirectory tex-last-temp-file) dir)))) + (while list (if not-all (and ;; If arg is non-nil, don't delete the .dvi file. |