# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1223152272 0
# Node ID 56d0534bbfa521b9ffca82fc831cec2d32e209b9
# Parent  291daaa7821335429c0af69276e859819805f39a
(make-temp-file): Handle empty `prefix'.  (Bug#1081)

diff -r 291daaa78213 -r 56d0534bbfa5 lisp/files.el
--- 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