diff lisp/gnus/message.el @ 151:59463afc5666 r20-3b2

Import from CVS: tag r20-3b2
author cvs
date Mon, 13 Aug 2007 09:37:19 +0200
parents 1856695b1fa9
children 25f70ba0133c
line wrap: on
line diff
--- a/lisp/gnus/message.el	Mon Aug 13 09:36:20 2007 +0200
+++ b/lisp/gnus/message.el	Mon Aug 13 09:37:19 2007 +0200
@@ -2968,7 +2968,7 @@
     (let ((name (make-temp-name
 		 (expand-file-name
 		  (concat (file-name-as-directory message-autosave-directory)
-			  "msg.")))))
+			  "msg." (buffer-name))))))
       (setq buffer-auto-save-file-name
 	    (save-excursion
 	      (prog1