# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 862279654 0
# Node ID eaad8bd00b12b5bede65aae6b3bf26deeef81546
# Parent  1a6a798242d69ddb95008cf0ae0455e470361405
Bind C-x m, C-x 4 m, C-x 5 m to compose-mail...

diff -r 1a6a798242d6 -r eaad8bd00b12 lisp/bindings.el
--- a/lisp/bindings.el	Tue Apr 29 02:07:02 1997 +0000
+++ b/lisp/bindings.el	Tue Apr 29 02:07:34 1997 +0000
@@ -485,6 +485,10 @@
 (define-key esc-map "\t" 'lisp-complete-symbol)
 
 (define-key ctl-x-map "\C-e" 'eval-last-sexp)
+
+(define-key ctl-x-map "m" 'compose-mail)
+(define-key ctl-x-4-map "m" 'compose-mail-other-window)
+(define-key ctl-x-5-map "m" 'compose-mail-other-frame)
 
 (define-key ctl-x-map "r\C-@" 'point-to-register)
 (define-key ctl-x-map [?r ?\C-\ ] 'point-to-register)