diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 671c3fdc1bc..61bf3659150 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -2217,6 +2217,8 @@ see `message-narrow-to-headers-or-head'." (beginning-of-line) (while (looking-at "[ \t]") (forward-line -1)) + ;; `syntax-propertize' can't widen so make sure it won't need to (bug#81035). + (syntax-propertize (point)) (narrow-to-region (point) (progn @@ -8658,6 +8660,9 @@ From headers in the original article." (save-excursion (goto-char end-of-headers) (insert-before-markers header)))))))) + ;; `syntax-propertize' can't widen so make sure it won't need to + ;; (bug#81035). + (syntax-propertize end-of-headers) (narrow-to-region end-of-headers (point-max))))) (defun message-hide-header-p (regexps)