# HG changeset patch # User Chong Yidong # Date 1130084975 0 # Node ID 315411603f68c4e4c31ce37aee61cbd6ea583e0a # Parent eaa19e98cd04359685462613a8ea8e97621ab5bb Reverted last change for a better fix: * gnus-sum.el (gnus-ignored-from-addresses): Handle case where user-mail-name is an empty string. diff -r eaa19e98cd04 -r 315411603f68 lisp/gnus/ChangeLog --- a/lisp/gnus/ChangeLog Sun Oct 23 16:25:36 2005 +0000 +++ b/lisp/gnus/ChangeLog Sun Oct 23 16:29:35 2005 +0000 @@ -1,7 +1,7 @@ 2005-10-23 Chong Yidong - * gnus-sum.el (gnus-summary-from-or-to-or-newsgroups): Handle case - where gnus-ignored-from-address is an empty string. + * gnus-sum.el (gnus-ignored-from-addresses): Handle case where + user-mail-name is an empty string. 2005-10-20 Hiroshi Fujishima (tiny change) diff -r eaa19e98cd04 -r 315411603f68 lisp/gnus/gnus-sum.el --- a/lisp/gnus/gnus-sum.el Sun Oct 23 16:25:36 2005 +0000 +++ b/lisp/gnus/gnus-sum.el Sun Oct 23 16:29:35 2005 +0000 @@ -1000,7 +1000,9 @@ :type '(repeat symbol)) (defcustom gnus-ignored-from-addresses - (and user-mail-address (regexp-quote user-mail-address)) + (and user-mail-address + (not (string= user-mail-address "")) + (regexp-quote user-mail-address)) "*Regexp of From headers that may be suppressed in favor of To headers." :version "21.1" :group 'gnus-summary @@ -3304,7 +3306,6 @@ gnus-newsgroup-ignored-charsets))) (or (and gnus-ignored-from-addresses - (not (string= gnus-ignored-from-addresses "")) (string-match gnus-ignored-from-addresses gnus-tmp-from) (let ((extra-headers (mail-header-extra header)) to