diff options
| author | Richard M. Stallman | 2005-03-17 23:43:17 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-03-17 23:43:17 +0000 |
| commit | 231717ee730702ef5a0b960506389937cc31e72f (patch) | |
| tree | ca79f427d2bb190eba838d68991fcf5b29f17aa7 /lisp | |
| parent | fe8b8401e773c75b49a9611ffe03f3fbc744e8c8 (diff) | |
| download | emacs-231717ee730702ef5a0b960506389937cc31e72f.tar.gz emacs-231717ee730702ef5a0b960506389937cc31e72f.zip | |
(esc-map): Make M-g a prefix. Bind M-g g and M-g M-g to goto-line.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/bindings.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 81425eba2d5..25ad6729de8 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el | |||
| @@ -705,7 +705,9 @@ language you are using." | |||
| 705 | (define-key ctl-x-map "\C-n" 'set-goal-column) | 705 | (define-key ctl-x-map "\C-n" 'set-goal-column) |
| 706 | (define-key global-map "\C-a" 'move-beginning-of-line) | 706 | (define-key global-map "\C-a" 'move-beginning-of-line) |
| 707 | (define-key global-map "\C-e" 'move-end-of-line) | 707 | (define-key global-map "\C-e" 'move-end-of-line) |
| 708 | (define-key esc-map "g" 'goto-line) | 708 | (define-key esc-map "g" (make-sparse-keymap)) |
| 709 | (define-key esc-map "g\M-g" 'goto-line) | ||
| 710 | (define-key esc-map "gg" 'goto-line) | ||
| 709 | 711 | ||
| 710 | ;;(defun function-key-error () | 712 | ;;(defun function-key-error () |
| 711 | ;; (interactive) | 713 | ;; (interactive) |