[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r105189: * bindings.el: Add advertise
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r105189: * bindings.el: Add advertised binding for set-mark-command (Bug#5772). |
Date: |
Wed, 13 Jul 2011 21:58:51 -0400 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 105189
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Wed 2011-07-13 21:58:51 -0400
message:
* bindings.el: Add advertised binding for set-mark-command (Bug#5772).
modified:
lisp/ChangeLog
lisp/bindings.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-07-14 01:40:30 +0000
+++ b/lisp/ChangeLog 2011-07-14 01:58:51 +0000
@@ -1,5 +1,10 @@
2011-07-14 Chong Yidong <address@hidden>
+ * bindings.el: Add advertised binding for set-mark-command
+ (Bug#5772).
+
+2011-07-14 Chong Yidong <address@hidden>
+
* bindings.el (mode-line-other-buffer):
* bookmark.el (bookmark-bmenu-2-window):
* bs.el (bs-cycle-next, bs-cycle-previous):
=== modified file 'lisp/bindings.el'
--- a/lisp/bindings.el 2011-07-14 01:40:30 +0000
+++ b/lisp/bindings.el 2011-07-14 01:58:51 +0000
@@ -849,6 +849,8 @@
(define-key global-map "\C-@" 'set-mark-command)
;; Many people are used to typing C-SPC and getting address@hidden
(define-key global-map [?\C- ] 'set-mark-command)
+(put 'set-mark-command :advertised-binding [?\C- ])
+
(define-key ctl-x-map "\C-x" 'exchange-point-and-mark)
(define-key ctl-x-map "\C-@" 'pop-global-mark)
(define-key ctl-x-map [?\C- ] 'pop-global-mark)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105189: * bindings.el: Add advertised binding for set-mark-command (Bug#5772).,
Chong Yidong <=