Mercurial > emacs
diff lisp/mail/mailabbrev.el @ 12444:0f96d53b31b7
(mail-resolve-all-aliases-1):
Downcase address before recursive call.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 30 Jun 1995 05:54:07 +0000 |
| parents | ae5b033ad31f |
| children | 14e16370799d |
line wrap: on
line diff
--- a/lisp/mail/mailabbrev.el Fri Jun 30 05:12:56 1995 +0000 +++ b/lisp/mail/mailabbrev.el Fri Jun 30 05:54:07 1995 +0000 @@ -297,7 +297,7 @@ (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)