From: Richard M. Stallman Date: Thu, 17 Mar 2005 23:43:17 +0000 (+0000) Subject: (esc-map): Make M-g a prefix. Bind M-g g and M-g M-g to goto-line. X-Git-Tag: ttn-vms-21-2-B4~1737 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=231717ee730702ef5a0b960506389937cc31e72f;p=emacs.git (esc-map): Make M-g a prefix. Bind M-g g and M-g M-g to goto-line. --- 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." (define-key ctl-x-map "\C-n" 'set-goal-column) (define-key global-map "\C-a" 'move-beginning-of-line) (define-key global-map "\C-e" 'move-end-of-line) -(define-key esc-map "g" 'goto-line) +(define-key esc-map "g" (make-sparse-keymap)) +(define-key esc-map "g\M-g" 'goto-line) +(define-key esc-map "gg" 'goto-line) ;;(defun function-key-error () ;; (interactive)