[Emacs-diffs] master 08f0b0b 1/2: Fold too-long headers in Message automatically

[Lars Ingebrigtsen]

branch: master
commit 08f0b0b98c53c4d5cf92b6dc57463e5b356043c4
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Fold too-long headers in Message automatically
    
    * lisp/gnus/message.el (message--fold-long-headers): Header lines
    should be no longer than 79 characters before folding
    (bug#33313).  Previous comment about 998 octets is about maximum
    allowed header field length.
---
 lisp/gnus/message.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 727bbab..db23217 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4643,11 +4643,11 @@ If you always want Gnus to send messages in one piece, 
set
 
 (defun message--fold-long-headers ()
   "Fold too-long header lines.
-They should be no longer than 998 octets long."
+Each line should be no more than 79 characters long."
   (goto-char (point-min))
   (while (not (eobp))
     (when (and (looking-at "[^:]+:")
-               (> (- (line-end-position) (point)) 998))
+               (> (- (line-end-position) (point)) 79))
       (mail-header-fold-field))
     (forward-line 1)))