aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2012-04-15 17:16:50 +0800
committerChong Yidong2012-04-15 17:16:50 +0800
commit5dd1713eeb99b60b6d4a1b9ed6a64fb3c95a21cd (patch)
treee4d6e3baebc01f40a6f19c81525d8f0e854ba645
parente6fd457e010c2ec034a331335530d817852cc11c (diff)
downloademacs-5dd1713eeb99b60b6d4a1b9ed6a64fb3c95a21cd.tar.gz
emacs-5dd1713eeb99b60b6d4a1b9ed6a64fb3c95a21cd.zip
* bindings.el (goto-map): Bind goto-char to M-g c.
Fixes: debbugs:11240
-rw-r--r--etc/NEWS2
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/bindings.el1
3 files changed, 7 insertions, 0 deletions
diff --git a/etc/NEWS b/etc/NEWS
index 186dca19495..56a0c9bf95d 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -47,6 +47,8 @@ prompts for a column number.
47** `C-M-f' and `C-M-b' will now move to the path name separator 47** `C-M-f' and `C-M-b' will now move to the path name separator
48character when doing minibuffer filename prompts. 48character when doing minibuffer filename prompts.
49 49
50** `goto-char' is now bound to `M-g c'.
51
50 52
51* Changes in Specialized Modes and Packages in Emacs 24.2 53* Changes in Specialized Modes and Packages in Emacs 24.2
52 54
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b2a3f135109..4b1fa58108f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12012-04-15 Chong Yidong <cyd@gnu.org>
2
3 * bindings.el (goto-map): Bind goto-char to M-g c (Bug#11240).
4
12012-04-15 Stefan Monnier <monnier@iro.umontreal.ca> 52012-04-15 Stefan Monnier <monnier@iro.umontreal.ca>
2 6
3 Avoid the use of ((lambda ...) ...) in lexical-binding code. 7 Avoid the use of ((lambda ...) ...) in lexical-binding code.
diff --git a/lisp/bindings.el b/lisp/bindings.el
index a87f321c936..8cfeecf5b40 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -868,6 +868,7 @@ if `inhibit-field-text-motion' is non-nil."
868 "Keymap for navigation commands.") 868 "Keymap for navigation commands.")
869(define-key esc-map "g" goto-map) 869(define-key esc-map "g" goto-map)
870 870
871(define-key goto-map "c" 'goto-char)
871(define-key goto-map "g" 'goto-line) 872(define-key goto-map "g" 'goto-line)
872(define-key goto-map "\M-g" 'goto-line) 873(define-key goto-map "\M-g" 'goto-line)
873(define-key goto-map "n" 'next-error) 874(define-key goto-map "n" 'next-error)