Mercurial > hg > xemacs-beta
diff lisp/gnus/message.el @ 155:43dd3413c7c7 r20-3b4
Import from CVS: tag r20-3b4
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:39:39 +0200 |
parents | 25f70ba0133c |
children | 0132846995bd |
line wrap: on
line diff
--- a/lisp/gnus/message.el Mon Aug 13 09:38:27 2007 +0200 +++ b/lisp/gnus/message.el Mon Aug 13 09:39:39 2007 +0200 @@ -2484,9 +2484,10 @@ (let ((stop-pos (string-match " *at \\| *@ \\| *(\\| *<" from))) (concat (if stop-pos (substring from 0 stop-pos) from) - "'s message of " + "'s message of \"" (if (or (not date) (string= date "")) - "(unknown date)" date))))))) + "(unknown date)" date) + "\"")))))) (defun message-make-distribution () "Make a Distribution header."