projects / elisp / gnus.git- / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 3ce248f)
(article-hide-boring-headers): Funcall
authorshuhei-k <shuhei-k>
Fri, 19 Jun 1998 08:47:06 +0000 (08:47 +0000)
committershuhei-k <shuhei-k>
Fri, 19 Jun 1998 08:47:06 +0000 (08:47 +0000)
`gnus-extract-address-components'.

lisp/gnus-art.el patch | blob | history

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 37dc161..ce5f687 100644 (file)
--- 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")))