aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-07-29 18:24:32 +0000
committerRichard M. Stallman1993-07-29 18:24:32 +0000
commit7520f3189088b9919d0780807c89892aa110ae23 (patch)
tree7354e8b5df5eb2bfd71646468daea35e64bf8bc7
parent60bf8ee42668aa18974c23a6c625a1dfdb77a35c (diff)
downloademacs-7520f3189088b9919d0780807c89892aa110ae23.tar.gz
emacs-7520f3189088b9919d0780807c89892aa110ae23.zip
Do the global key bindings only via loaddefs.el,
not when sendmail.el is loaded.
-rw-r--r--lisp/mail/sendmail.el15
1 files changed, 5 insertions, 10 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 5eb37c9c32d..48a4ce051bc 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -831,16 +831,11 @@ The seventh argument ACTIONS is a list of actions to take
831 (pop-to-buffer "*mail*")) 831 (pop-to-buffer "*mail*"))
832 (mail noerase to subject in-reply-to cc replybuffer sendactions)) 832 (mail noerase to subject in-reply-to cc replybuffer sendactions))
833 833
834 834;;; Do not execute these when sendmail.el is loaded,
835;;;###autoload 835;;; only in loaddefs.el.
836(define-key ctl-x-map "m" 'mail) 836;;;###autoload (define-key ctl-x-map "m" 'mail)
837 837;;;###autoload (define-key ctl-x-4-map "m" 'mail-other-window)
838;;;###autoload 838;;;###autoload (define-key ctl-x-5-map "m" 'mail-other-frame)
839(define-key ctl-x-4-map "m" 'mail-other-window)
840
841;;;###autoload
842(define-key ctl-x-5-map "m" 'mail-other-frame)
843
844 839
845;;; Do not add anything but external entries on this page. 840;;; Do not add anything but external entries on this page.
846 841