diff lisp/gnus/message.el @ 34:d620409f5eb8 r19-15b100

Import from CVS: tag r19-15b100
author cvs
date Mon, 13 Aug 2007 08:53:20 +0200
parents e04119814345
children 1a767b41a199
line wrap: on
line diff
--- a/lisp/gnus/message.el	Mon Aug 13 08:52:58 2007 +0200
+++ b/lisp/gnus/message.el	Mon Aug 13 08:53:20 2007 +0200
@@ -2905,8 +2905,9 @@
     (unless (file-exists-p message-autosave-directory)
       (make-directory message-autosave-directory t))
     (let ((name (make-temp-name
-		 (concat (file-name-as-directory message-autosave-directory)
-			 "msg."))))
+		 (expand-file-name
+		  (concat (file-name-as-directory message-autosave-directory)
+			  "msg.")))))
       (setq buffer-auto-save-file-name
 	    (save-excursion
 	      (prog1