Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 01:34:21 +00:00
Code Issues Projects Releases Packages Wiki Activity

gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in From header.

Browse source
This commit is contained in:
Katsumi Yamaoka 2010-11-07 01:10:01 +00:00
parent 26f097bff6
commit c9bc6636f9
2 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2010-11-07 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip
asterisks in From header.
2010-11-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
* gnus-ems.el (gnus-put-image): Use a blank text as the insertion

5
lisp/gnus/gnus-gravatar.el
View file

@ -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