master d7f0a0538d: Followup fix to previous message-update-smtp-method-header change

[Lars Ingebrigtsen]

branch: master
commit d7f0a0538d954f8e99dd55a2881b905ee053797e
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Followup fix to previous message-update-smtp-method-header change
    
    * lisp/gnus/message.el (message-update-smtp-method-header): Narrow
    to the headers first.
---
 lisp/gnus/message.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 2735c043b3..a6c6a16653 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