Mercurial > emacs
comparison lisp/bindings.el @ 17595:eaad8bd00b12
Bind C-x m, C-x 4 m, C-x 5 m to compose-mail...
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 29 Apr 1997 02:07:34 +0000 |
| parents | 353927a72c58 |
| children | 5b2fa4a13a8b |
comparison
equal
deleted
inserted
replaced
| 17594:1a6a798242d6 | 17595:eaad8bd00b12 |
|---|---|
| 483 (define-key esc-map "(" 'insert-parentheses) | 483 (define-key esc-map "(" 'insert-parentheses) |
| 484 (define-key esc-map ")" 'move-past-close-and-reindent) | 484 (define-key esc-map ")" 'move-past-close-and-reindent) |
| 485 (define-key esc-map "\t" 'lisp-complete-symbol) | 485 (define-key esc-map "\t" 'lisp-complete-symbol) |
| 486 | 486 |
| 487 (define-key ctl-x-map "\C-e" 'eval-last-sexp) | 487 (define-key ctl-x-map "\C-e" 'eval-last-sexp) |
| 488 | |
| 489 (define-key ctl-x-map "m" 'compose-mail) | |
| 490 (define-key ctl-x-4-map "m" 'compose-mail-other-window) | |
| 491 (define-key ctl-x-5-map "m" 'compose-mail-other-frame) | |
| 488 | 492 |
| 489 (define-key ctl-x-map "r\C-@" 'point-to-register) | 493 (define-key ctl-x-map "r\C-@" 'point-to-register) |
| 490 (define-key ctl-x-map [?r ?\C-\ ] 'point-to-register) | 494 (define-key ctl-x-map [?r ?\C-\ ] 'point-to-register) |
| 491 (define-key ctl-x-map "r " 'point-to-register) | 495 (define-key ctl-x-map "r " 'point-to-register) |
| 492 (define-key ctl-x-map "rj" 'jump-to-register) | 496 (define-key ctl-x-map "rj" 'jump-to-register) |