diff options
author | Richard M. Stallman <rms@gnu.org> | 1995-06-30 05:54:07 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1995-06-30 05:54:07 +0000 |
commit | a09c95308dbc9c09d8b4fa282928c4f1d65f96b8 (patch) | |
tree | 3c778d8e1af4873963b754cab67557369f85be71 /lisp/mail/mailabbrev.el | |
parent | 6bd4a68136d5a04db8fe84a8b0d4443610a559e2 (diff) | |
download | emacs-a09c95308dbc9c09d8b4fa282928c4f1d65f96b8.tar.gz |
(mail-resolve-all-aliases-1):
Downcase address before recursive call.
Diffstat (limited to 'lisp/mail/mailabbrev.el')
-rw-r--r-- | lisp/mail/mailabbrev.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index 3245fc9e958..685839f9506 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -297,7 +297,7 @@ If DEFINITION contains multiple addresses, separate them with commas." (setq definition (mapconcat (function (lambda (x) (or (mail-resolve-all-aliases-1 - (intern-soft x mail-abbrevs) + (intern-soft (downcase x) mail-abbrevs) (cons sym so-far)) x))) (nreverse result) |