diff lisp/gnus/message.el @ 153:25f70ba0133c r20-3b3

Import from CVS: tag r20-3b3
author cvs
date Mon, 13 Aug 2007 09:38:25 +0200
parents 59463afc5666
children 43dd3413c7c7
line wrap: on
line diff
--- a/lisp/gnus/message.el	Mon Aug 13 09:37:21 2007 +0200
+++ b/lisp/gnus/message.el	Mon Aug 13 09:38:25 2007 +0200
@@ -2968,7 +2968,9 @@
     (let ((name (make-temp-name
 		 (expand-file-name
 		  (concat (file-name-as-directory message-autosave-directory)
-			  "msg." (buffer-name))))))
+			  "msg."
+			  (nnheader-replace-chars-in-string
+			   (buffer-name) ?* ?.))))))
       (setq buffer-auto-save-file-name
 	    (save-excursion
 	      (prog1