Mercurial > emacs
diff lisp/gnus/message.el @ 98398:39408ed11da9
Merge from gnus--devo--0
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1436
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Tue, 30 Sep 2008 00:48:01 +0000 |
| parents | 952d664ebd93 |
| children | b1be79c8e945 |
line wrap: on
line diff
--- a/lisp/gnus/message.el Tue Sep 30 00:47:51 2008 +0000 +++ b/lisp/gnus/message.el Tue Sep 30 00:48:01 2008 +0000 @@ -445,7 +445,7 @@ "When non-nil, ask for confirmation when sending a message." :group 'message-sending :group 'message-mail - :version "22.3" ;; No Gnus + :version "23.1" ;; No Gnus :link '(custom-manual "(message)Sending Variables") :type 'boolean) @@ -5633,7 +5633,8 @@ (mapcar (lambda (rhs) (or (cadr (split-string rhs "@")) "")) (mapcar 'downcase (mapcar - 'car (mail-header-parse-addresses field)))))) + 'cadr + (mail-extract-address-components field t)))))) (setq ace (if (string-match "\\`[[:ascii:]]+\\'" rhs) rhs (downcase (idna-to-ascii rhs))))