# HG changeset patch
# User Katsumi Yamaoka <yamaoka@jpl.org>
# Date 1289092201 0
# Node ID 8de1e4554e5e93acb180e954dbf416292b55a6d9
# Parent  e4200648c86fcda3769b9c16bafc565e964a1683
gnus-gravatar.el (gnus-gravatar-transform-address): No need to skip asterisks in From header.

diff -r e4200648c86f -r 8de1e4554e5e lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Sat Nov 06 18:06:37 2010 -0700
+++ b/lisp/gnus/ChangeLog	Sun Nov 07 01:10:01 2010 +0000
@@ -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
diff -r e4200648c86f -r 8de1e4554e5e lisp/gnus/gnus-gravatar.el
--- 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