[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ac79d73: Fix problem with unprintable characters in Message heade
From: |
Lars Ingebrigtsen |
Subject: |
master ac79d73: Fix problem with unprintable characters in Message headers |
Date: |
Thu, 20 Aug 2020 10:33:38 -0400 (EDT) |
branch: master
commit ac79d73760c6789ec8b47f7795b1a8040758647a
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix problem with unprintable characters in Message headers
* lisp/gnus/message.el (message-fix-before-sending): Remove
unprintable characters from the entire buffer, not just the body
(bug#38955).
---
lisp/gnus/message.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index d4b057f..0fd490b 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4430,7 +4430,7 @@ conformance."
(error "Invisible text found and made visible")))))
(message-check 'illegible-text
(let (char found choice nul-chars)
- (message-goto-body)
+ (goto-char (point-min))
(setq nul-chars (save-excursion
(search-forward "\000" nil t)))
(while (progn
@@ -4470,7 +4470,7 @@ conformance."
(?e "edit" "Continue editing")))))
(if (eq choice ?e)
(error "Non-printable characters"))
- (message-goto-body)
+ (goto-char (point-min))
(skip-chars-forward mm-7bit-chars)
(while (not (eobp))
(when (let ((char (char-after)))
@@ -4811,7 +4811,7 @@ If you always want Gnus to send messages in one piece, set
message-courtesy-message)))
;; If this was set, `sendmail-program' takes care of encoding.
(unless message-inhibit-body-encoding
- ;; Let's make sure we encoded all the body.
+ ;; Let's make sure we encoded everything in the buffer.
(cl-assert (save-excursion
(goto-char (point-min))
(not (re-search-forward "[^\000-\377]" nil t)))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master ac79d73: Fix problem with unprintable characters in Message headers,
Lars Ingebrigtsen <=