Synch with Oort Gnus.

[elisp/gnus.git-] / lisp / message.el

diff --git a/lisp/message.el b/lisp/message.el
index bd0265f..fe109bb 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2202,7 +2202,8 @@ Prefix arg means justify as well."
 
 (defun message-do-auto-fill ()
   "Like `do-auto-fill', but don't fill in message header."
-  (unless (text-property-any (gnus-point-at-bol) (point) 'field 'header)
+  (unless (text-property-any (gnus-point-at-bol) (point)
+                            'message-field 'header)
     (do-auto-fill)))
 
 (defun message-insert-signature (&optional force)