diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-07-06 22:41:48 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-07-06 22:41:48 +0000 |
| commit | 02fd229c46d46605a831e1b5e8a34c6eedb03a85 (patch) | |
| tree | 53a8e1b9466f6f469652715f124fd43cbfa44a98 /lisp | |
| parent | f71599f4b4c0f081688f61f0ee4547edce82edd0 (diff) | |
| download | emacs-02fd229c46d46605a831e1b5e8a34c6eedb03a85.tar.gz emacs-02fd229c46d46605a831e1b5e8a34c6eedb03a85.tar.bz2 emacs-02fd229c46d46605a831e1b5e8a34c6eedb03a85.zip | |
(tex-delete-last-temp-files): Use file-name-sans-extensions.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 43447bcc7ab..58b7f266fcb 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -1045,7 +1045,9 @@ If NOT-ALL is non-nil, save the `.dvi' file." (let* ((dir (file-name-directory tex-last-temp-file)) (list (and (file-directory-p dir) (file-name-all-completions - (file-name-nondirectory tex-last-temp-file) dir)))) + (file-name-sans-extension + (file-name-nondirectory tex-last-temp-file)) + dir)))) (while list (if not-all (and |