1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el
index 1001d11df4f..b30e4d125b2 100644
--- a/lisp/gnus/gnus-util.el
+++ b/lisp/gnus/gnus-util.el
@@ -141,7 +141,7 @@ This is a compatibility function for different Emacsen."
  "Extract address components from a From header.
 Given an RFC-822 address FROM, extract full name and canonical address.
 Returns a list of the form (FULL-NAME CANONICAL-ADDRESS).  Much more simple
-solution than `mail-extract-address-components', which works much better, but
+solution than `mail-header-parse-address', which works much better, but
 is slower."
  (let (name address)
    ;; First find the address - the thing with the @ in it.  This may

diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index 1001d11df4f..b30e4d125b2 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el
@@ -141,7 +141,7 @@ This is a compatibility function for different Emacsen."
141	"Extract address components from a From header.	141	"Extract address components from a From header.
142	Given an RFC-822 address FROM, extract full name and canonical address.	142	Given an RFC-822 address FROM, extract full name and canonical address.
143	Returns a list of the form (FULL-NAME CANONICAL-ADDRESS). Much more simple	143	Returns a list of the form (FULL-NAME CANONICAL-ADDRESS). Much more simple
144	solution than `mail-extract-address-components', which works much better, but	144	solution than `mail-header-parse-address', which works much better, but
145	is slower."	145	is slower."
146	(let (name address)	146	(let (name address)
147	;; First find the address - the thing with the @ in it. This may	147	;; First find the address - the thing with the @ in it. This may