aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-07-06 22:41:48 +0000
committerRichard M. Stallman1998-07-06 22:41:48 +0000
commit02fd229c46d46605a831e1b5e8a34c6eedb03a85 (patch)
tree53a8e1b9466f6f469652715f124fd43cbfa44a98
parentf71599f4b4c0f081688f61f0ee4547edce82edd0 (diff)
downloademacs-02fd229c46d46605a831e1b5e8a34c6eedb03a85.tar.gz
emacs-02fd229c46d46605a831e1b5e8a34c6eedb03a85.zip
(tex-delete-last-temp-files): Use file-name-sans-extensions.
-rw-r--r--lisp/textmodes/tex-mode.el4
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."
1045 (let* ((dir (file-name-directory tex-last-temp-file)) 1045 (let* ((dir (file-name-directory tex-last-temp-file))
1046 (list (and (file-directory-p dir) 1046 (list (and (file-directory-p dir)
1047 (file-name-all-completions 1047 (file-name-all-completions
1048 (file-name-nondirectory tex-last-temp-file) dir)))) 1048 (file-name-sans-extension
1049 (file-name-nondirectory tex-last-temp-file))
1050 dir))))
1049 (while list 1051 (while list
1050 (if not-all 1052 (if not-all
1051 (and 1053 (and