From: shuhei-k Date: Fri, 19 Jun 1998 08:47:06 +0000 (+0000) Subject: (article-hide-boring-headers): Funcall X-Git-Tag: semi-mule-199811302358~65 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6d8fe57af17f2311e7fd109458bd672842bcf574;p=elisp%2Fgnus.git- (article-hide-boring-headers): Funcall `gnus-extract-address-components'. --- diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 37dc161..ce5f687 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -751,8 +751,8 @@ always hide." from reply-to (ignore-errors (equal - (nth 1 (mail-extract-address-components from)) - (nth 1 (mail-extract-address-components reply-to))))) + (nth 1 (funcall gnus-extract-address-components from)) + (nth 1 (funcall gnus-extract-address-components reply-to))))) (gnus-article-hide-header "reply-to")))) ((eq elem 'date) (let ((date (message-fetch-field "date")))