(mail-mode-map): Use eval-after-load to change it.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 45adc741bcbac041d15a326138addf6556f64209..00f110011628dcdeaa76ff2d4747a27a4390a101 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-02-09  Richard M. Stallman  <rms@gnu.org>
+
+       * mail/mailabbrev.el (mail-mode-map): Use eval-after-load to change it.
+
 2002-02-09  Kim F. Storm  <storm@cua.dk>
 
        * faces.el (mode-line-inactive): New face for mode-line for

diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el
index f57141dcb0ec96e6d5496b5eed692b4eb7f1489d..5243438fbe8b12d57fe091346f8ce23c28d175b2 100644 (file)
--- a/lisp/mail/mailabbrev.el
+++ b/lisp/mail/mailabbrev.el
@@ -598,9 +598,11 @@ Don't use this command in Lisp programs!
   (setq this-command 'end-of-buffer)
   (end-of-buffer arg))
 
-(define-key mail-mode-map "\C-c\C-a" 'mail-abbrev-insert-alias)
-(define-key mail-mode-map "\e\t"       ; like lisp-complete-symbol
-  'mail-abbrev-complete-alias) 
+(eval-after-load "sendmail"
+  '(progn
+     (define-key mail-mode-map "\C-c\C-a" 'mail-abbrev-insert-alias)
+     (define-key mail-mode-map "\e\t"  ; like lisp-complete-symbol
+       'mail-abbrev-complete-alias)))
 
 ;;(define-key mail-mode-map "\C-n" 'mail-abbrev-next-line)
 ;;(define-key mail-mode-map "\M->" 'mail-abbrev-end-of-buffer)