From f526e65a47f11a48cbaca1e0dfd608025bd0a904 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 9 Feb 2002 09:46:08 +0000 Subject: [PATCH] (mail-mode-map): Use eval-after-load to change it. --- lisp/ChangeLog | 4 ++++ lisp/mail/mailabbrev.el | 8 +++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 45adc741bcb..00f11001162 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-02-09 Richard M. Stallman + + * mail/mailabbrev.el (mail-mode-map): Use eval-after-load to change it. + 2002-02-09 Kim F. Storm * faces.el (mode-line-inactive): New face for mode-line for diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index f57141dcb0e..5243438fbe8 100644 --- 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) -- 2.39.5