mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-17 17:58:46 +00:00
Code Issues Releases Activity

* lisp/gnus/message.el (message-remove-header): Don't remove things

Browse Source 
not looking like header (bug#31651).
This commit is contained in:
Katsumi Yamaoka 2018-05-30 23:30:11 +00:00
parent b682a7e5bc
commit df8649ac40
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/gnus/message.el
View File

@ -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)