# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1111102997 0
# Node ID 08055baffb977a006830bbc9f07cdf80ac5f40d1
# Parent  18bf961ed63a9a159092cb9c3f3b2b6db194e4fc
(esc-map): Make M-g a prefix.  Bind M-g g and M-g M-g to goto-line.

diff -r 18bf961ed63a -r 08055baffb97 lisp/bindings.el
--- a/lisp/bindings.el	Thu Mar 17 23:39:12 2005 +0000
+++ b/lisp/bindings.el	Thu Mar 17 23:43:17 2005 +0000
@@ -705,7 +705,9 @@
 (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)