diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-11-07 01:10:01 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-11-07 01:10:01 +0000 |
commit | c9bc6636f96c46a407c9347e56e052d2959ddf71 (patch) | |
tree | 73950786af3682703e3ce124917d58c5e9fd22ec /lisp/gnus/gnus-gravatar.el | |
parent | 26f097bff6dc221b89300a251d36b3cb9fe7ef5b (diff) | |
download | emacs-c9bc6636f96c46a407c9347e56e052d2959ddf71.tar.gz |
gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in From header.
Diffstat (limited to 'lisp/gnus/gnus-gravatar.el')
-rw-r--r-- | lisp/gnus/gnus-gravatar.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/gnus/gnus-gravatar.el b/lisp/gnus/gnus-gravatar.el index 2444c9e7818..a6ecd43ef7e 100644 --- a/lisp/gnus/gnus-gravatar.el +++ b/lisp/gnus/gnus-gravatar.el @@ -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 |