summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1998-04-24 20:17:35 +0000
committerRichard M. Stallman <rms@gnu.org>1998-04-24 20:17:35 +0000
commit310d0d401bafcf4660b52caa2dea768a32ce7aed (patch)
treecfa2cb4a40dcdad1cf89445a7ef49e6e631fd520 /lisp/mail
parenta58ef230d35c9ea9df6d67132f27db24ad397d4a (diff)
downloademacs-310d0d401bafcf4660b52caa2dea768a32ce7aed.tar.gz
(mail-complete-alist): Don't refer to mail-address-field-regexp.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/mailalias.el5
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)