diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-04-24 20:17:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-04-24 20:17:35 +0000 |
| commit | 310d0d401bafcf4660b52caa2dea768a32ce7aed (patch) | |
| tree | cfa2cb4a40dcdad1cf89445a7ef49e6e631fd520 | |
| parent | a58ef230d35c9ea9df6d67132f27db24ad397d4a (diff) | |
| download | emacs-310d0d401bafcf4660b52caa2dea768a32ce7aed.tar.gz | |
(mail-complete-alist): Don't refer to mail-address-field-regexp.
| -rw-r--r-- | lisp/mail/mailalias.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el index f4f5df17bba..5916329f68a 100644 --- a/lisp/mail/mailalias.el +++ b/lisp/mail/mailalias.el @@ -56,7 +56,10 @@ When t this still needs to be initialized.") (defcustom mail-complete-alist ;; Don't use backquote here; we don't want backquote to get loaded ;; just because of loading this file. - (cons (cons mail-address-field-regexp '(mail-get-names pattern)) + ;; Don't refer to mail-address-field-regexp here; + ;; that confuses some things such as cus-dep.el. + (cons '("^\\(Resent-\\)?\\(To\\|From\\|CC\\|BCC\\|Reply-to\\):" + . (mail-get-names pattern)) '(("Newsgroups:" . (if (boundp 'gnus-active-hashtb) gnus-active-hashtb (if (boundp news-group-article-assoc) |