diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-01-21 14:20:31 +0100 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-01-21 14:20:31 +0100 |
commit | d7f0a0538d954f8e99dd55a2881b905ee053797e (patch) | |
tree | a3f623437d7a8ef99eed30802ca476e47c022063 /lisp/gnus/message.el | |
parent | 1fefb15aa8ef1de3e78e55af0395bc543bb8018f (diff) | |
download | emacs-d7f0a0538d954f8e99dd55a2881b905ee053797e.tar.gz |
Followup fix to previous message-update-smtp-method-header change
* lisp/gnus/message.el (message-update-smtp-method-header): Narrow
to the headers first.
Diffstat (limited to 'lisp/gnus/message.el')
-rw-r--r-- | lisp/gnus/message.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 2735c043b31..a6c6a16653d 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -4360,6 +4360,7 @@ it is left unchanged." (let ((from (cadr (mail-extract-address-components (save-restriction (widen) + (message-narrow-to-headers-or-head) (message-fetch-field "From"))))) method) (catch 'exit |