mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(make-temp-file): Handle empty `prefix'. (Bug#1081)

Browse source
This commit is contained in:
Glenn Morris 2008-10-04 20:31:33 +00:00
parent a80a6b0308
commit f8dce815d0
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -1,5 +1,7 @@
2008-10-04 Glenn Morris <rgm@gnu.org>
* files.el (make-temp-file): Handle empty `prefix'. (Bug#1081)
* vc-svn.el (vc-svn-after-dir-status): Handle `svn status -u' output.
(vc-svn-dir-status): Respect vc-stay-local-p. (Bug#1046)

6
lisp/files.el
View file

@ -976,7 +976,11 @@ If SUFFIX is non-nil, add that at the end of the file name."
(progn
(setq file
(make-temp-name
(expand-file-name prefix temporary-file-directory)))
(if (zerop (length prefix))
(file-name-as-directory
temporary-file-directory)
(expand-file-name prefix
temporary-file-directory))))
(if suffix
(setq file (concat file suffix)))
(if dir-flag