/[emacs]/emacs/lisp/gnus/gnus-sum.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-sum.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.73 by cyd, Sun Oct 23 16:25:36 2005 UTC revision 1.74 by cyd, Sun Oct 23 16:29:35 2005 UTC
# Line 1000  which it may alter in any way." Line 1000  which it may alter in any way."
1000    :type '(repeat symbol))    :type '(repeat symbol))
1001    
1002  (defcustom gnus-ignored-from-addresses  (defcustom gnus-ignored-from-addresses
1003    (and user-mail-address (regexp-quote user-mail-address))    (and user-mail-address  
1004           (not (string= user-mail-address ""))
1005           (regexp-quote user-mail-address))
1006    "*Regexp of From headers that may be suppressed in favor of To headers."    "*Regexp of From headers that may be suppressed in favor of To headers."
1007    :version "21.1"    :version "21.1"
1008    :group 'gnus-summary    :group 'gnus-summary
# Line 3304  buffer that was in action when the last Line 3306  buffer that was in action when the last
3306                           gnus-newsgroup-ignored-charsets)))                           gnus-newsgroup-ignored-charsets)))
3307      (or      (or
3308       (and gnus-ignored-from-addresses       (and gnus-ignored-from-addresses
           (not (string= gnus-ignored-from-addresses ""))  
3309            (string-match gnus-ignored-from-addresses gnus-tmp-from)            (string-match gnus-ignored-from-addresses gnus-tmp-from)
3310            (let ((extra-headers (mail-header-extra header))            (let ((extra-headers (mail-header-extra header))
3311                  to                  to

Legend:
Removed from v.1.73  
changed lines
  Added in v.1.74

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26