Mercurial > emacs

changeset 98521:56d0534bbfa5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(make-temp-file): Handle empty `prefix'. (Bug#1081)
author Glenn Morris <rgm@gnu.org>
date Sat, 04 Oct 2008 20:31:12 +0000
parents 291daaa78213
children 3ca5759251e6
files lisp/files.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Sat Oct 04 20:24:24 2008 +0000
+++ b/lisp/files.el	Sat Oct 04 20:31:12 2008 +0000
@@ -976,7 +976,11 @@
 		     (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