[Mail] Ensure SMTP related variables are loaded before binding them
I do not know whether this is really necessary, but since ‘let’ should bind variables like ‘smtpmail-smtp-server’ and the like dynamically, it feels better to have them loaded before binding them.
This commit is contained in:
parent
c52f3c7fdd
commit
80ffb3845b
|
@ -119,6 +119,7 @@ will also be recognized when sending mail."
|
||||||
"Choose smtp-settings dynamically, based on the From: header
|
"Choose smtp-settings dynamically, based on the From: header
|
||||||
entry of the current mail."
|
entry of the current mail."
|
||||||
(require 'mail-extr)
|
(require 'mail-extr)
|
||||||
|
(require 'smtpmail) ; to have the globals bound below by let
|
||||||
(let* ((from (or (save-restriction
|
(let* ((from (or (save-restriction
|
||||||
(message-narrow-to-headers)
|
(message-narrow-to-headers)
|
||||||
(mail-fetch-field "From"))
|
(mail-fetch-field "From"))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user