diff options
author | Filipp Gunbin <fgunbin@fastmail.fm> | 2022-10-26 21:11:28 +0300 |
---|---|---|
committer | Filipp Gunbin <fgunbin@fastmail.fm> | 2022-10-26 21:13:16 +0300 |
commit | 56706c6946c4f8800fac0f2a5c3516273b01d8eb (patch) | |
tree | b5835037d39772518c4a154c9ba716b4b32f0f6d /lisp/gnus/message.el | |
parent | b7e59b9e194ac287fe627ccb26159d2f6f04939b (diff) | |
download | emacs-56706c6946c4f8800fac0f2a5c3516273b01d8eb.tar.gz |
Compare addresses case-insensitively in message-update-smtp-method-header
* lisp/gnus/message.el (message-update-smtp-method-header): Compare
addresses case-insensitively.
Diffstat (limited to 'lisp/gnus/message.el')
-rw-r--r-- | lisp/gnus/message.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index a714e318767..24cba97718a 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -4385,7 +4385,7 @@ it is left unchanged." (setq method (or (cdr server) res)) (throw 'exit nil)))) ((and (stringp (car server)) - (string= (car server) from)) + (string-equal-ignore-case (car server) from)) (setq method (cdr server)) (throw 'exit nil))))) (when method |