(mail-fetch-field): Doc fix.

diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index cc71c1a50b10de3ad4df55635675b8537a31000f..a30d06abacb24e9366c5d64a235d05083c3c5be1 100644 (file)
--- a/lisp/mail/mail-utils.el
+++ b/lisp/mail/mail-utils.el
@@ -228,9 +228,9 @@ Usenet paths ending in an element that matches are removed also."
 \f
 ;;;###autoload
 (defun mail-fetch-field (field-name &optional last all list)
-  "Return the value of the header field FIELD-NAME.
-The buffer is expected to be narrowed to just the headers of the message.
-If second arg LAST is non-nil, use the last such field if there are several.
+  "Return the value of the header field whose type is FIELD-NAME.
+The buffer is expected to be narrowed to just the header of the message.
+If second arg LAST is non-nil, use the last field of type FIELD-NAME.
 If third arg ALL is non-nil, concatenate all such fields with commas between.
 If 4th arg LIST is non-nil, return a list of all such fields."
   (save-excursion