Mercurial > emacs
comparison lisp/bindings.el @ 86275:2cce56fd7361
Merge from emacs--rel--22
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-937
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 21 Nov 2007 04:55:58 +0000 |
| parents | 04e61cffd3c0 2465de5f1ff2 |
| children | f358a2fd5895 53108e6cea98 |
comparison
equal
deleted
inserted
replaced
| 86274:860b7eb2a46f | 86275:2cce56fd7361 |
|---|---|
| 708 (define-key map "\es" 'next-matching-history-element) | 708 (define-key map "\es" 'next-matching-history-element) |
| 709 (define-key map "\er" 'previous-matching-history-element) | 709 (define-key map "\er" 'previous-matching-history-element) |
| 710 ;; Override the global binding (which calls indent-relative via | 710 ;; Override the global binding (which calls indent-relative via |
| 711 ;; indent-for-tab-command). The alignment that indent-relative tries to | 711 ;; indent-for-tab-command). The alignment that indent-relative tries to |
| 712 ;; do doesn't make much sense here since the prompt messes it up. | 712 ;; do doesn't make much sense here since the prompt messes it up. |
| 713 (define-key map "\t" 'self-insert-command)) | 713 (define-key map "\t" 'self-insert-command) |
| 714 (define-key minibuffer-local-map [C-tab] 'file-cache-minibuffer-complete)) | |
| 714 | 715 |
| 715 (define-key global-map "\C-u" 'universal-argument) | 716 (define-key global-map "\C-u" 'universal-argument) |
| 716 (let ((i ?0)) | 717 (let ((i ?0)) |
| 717 (while (<= i ?9) | 718 (while (<= i ?9) |
| 718 (define-key esc-map (char-to-string i) 'digit-argument) | 719 (define-key esc-map (char-to-string i) 'digit-argument) |
| 1077 (define-key esc-map "'" 'abbrev-prefix-mark) | 1078 (define-key esc-map "'" 'abbrev-prefix-mark) |
| 1078 (define-key ctl-x-map "'" 'expand-abbrev) | 1079 (define-key ctl-x-map "'" 'expand-abbrev) |
| 1079 | 1080 |
| 1080 (define-key ctl-x-map "z" 'repeat) | 1081 (define-key ctl-x-map "z" 'repeat) |
| 1081 | 1082 |
| 1083 (define-key esc-map "\C-l" 'reposition-window) | |
| 1084 | |
| 1085 (define-key ctl-x-4-map "a" 'add-change-log-entry-other-window) | |
| 1082 (define-key ctl-x-4-map "c" 'clone-indirect-buffer-other-window) | 1086 (define-key ctl-x-4-map "c" 'clone-indirect-buffer-other-window) |
| 1083 | 1087 |
| 1084 ;; Signal handlers | 1088 ;; Signal handlers |
| 1085 (define-key special-event-map [sigusr1] 'ignore) | 1089 (define-key special-event-map [sigusr1] 'ignore) |
| 1086 (define-key special-event-map [sigusr2] 'ignore) | 1090 (define-key special-event-map [sigusr2] 'ignore) |