Mercurial > emacs
diff lisp/gnus/gnus-gravatar.el @ 111432:8de1e4554e5e
gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in From header.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Sun, 07 Nov 2010 01:10:01 +0000 |
| parents | ea91aa0b9743 |
| children | d94e03b64838 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-gravatar.el Sat Nov 06 18:06:37 2010 -0700 +++ b/lisp/gnus/gnus-gravatar.el Sun Nov 07 01:10:01 2010 +0000 @@ -63,14 +63,11 @@ (gravatar-size gnus-gravatar-size) name) (dolist (address addresses) - (when (and (setq name (cdr address)) - (string-match "\\`\\*+ " name)) ;; (X-)Faces exist. - (setcdr address (setq name (substring name (match-end 0))))) (when (or force (not (and gnus-gravatar-too-ugly (or (string-match gnus-gravatar-too-ugly (car address)) - (and name + (and (setq name (cdr address)) (string-match gnus-gravatar-too-ugly name)))))) (ignore-errors