[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-26 df8649a: * lisp/gnus/message.el (message-remove-h
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] emacs-26 df8649a: * lisp/gnus/message.el (message-remove-header): Don't remove things |
Date: |
Wed, 30 May 2018 19:30:31 -0400 (EDT) |
branch: emacs-26
commit df8649ac40be54cc3007241c4c1d5b1cb81c54dd
Author: Katsumi Yamaoka <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>
* lisp/gnus/message.el (message-remove-header): Don't remove things
not looking like header (bug#31651).
---
lisp/gnus/message.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 0eebbe2..461f61f 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -2431,7 +2431,9 @@ Return the number of headers removed."
(while (and (not (eobp))
(not last))
(if (if reverse
- (not (looking-at regexp))
+ (and (not (looking-at regexp))
+ ;; Don't remove things not looking like header.
+ (looking-at "[!-9;-~]+:"))
(looking-at regexp))
(progn
(incf number)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-26 df8649a: * lisp/gnus/message.el (message-remove-header): Don't remove things,
Katsumi Yamaoka <=