Mercurial > emacs
changeset 91744:34698a40474e
(vc-prefix-key): Remove (undo 2008-02-06 patch).
| author | Sam Steingold <sds@gnu.org> |
|---|---|
| date | Mon, 11 Feb 2008 00:54:35 +0000 |
| parents | 4c109d4eb7eb |
| children | 68ea42b6ac6f |
| files | lisp/ChangeLog lisp/vc-hooks.el |
| diffstat | 2 files changed, 6 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Feb 11 00:50:40 2008 +0000 +++ b/lisp/ChangeLog Mon Feb 11 00:54:35 2008 +0000 @@ -1,3 +1,7 @@ +2008-02-11 Sam Steingold <sds@gnu.org> + + * vc-hooks.el (vc-prefix-key): Remove (undo 2008-02-06 patch). + 2008-02-11 Glenn Morris <rgm@gnu.org> * startup.el (emacs-startup-time): New variable. @@ -2317,7 +2321,7 @@ 2008-02-01 Dave Love <fx@gnu.org> - * international/characters.el: Make ,_/(B and ,A(B a case pair. + * international/characters.el: Make $,1!8(B and ,A(B a case pair. 2008-02-01 Kenichi Handa <handa@etl.go.jp>
--- a/lisp/vc-hooks.el Mon Feb 11 00:50:40 2008 +0000 +++ b/lisp/vc-hooks.el Mon Feb 11 00:54:35 2008 +0000 @@ -972,14 +972,7 @@ ;; (define-key map "?" 'vc-status) map)) (fset 'vc-prefix-map vc-prefix-map) -(defcustom vc-prefix-key "\C-xv" "*The prefix for the VC bindings." - :set (lambda (symbol prefix) ; symbol == vc-prefix-key - (define-key global-map prefix 'vc-prefix-map) ; install new prefix - (when (boundp 'vc-prefix-key) ; disable the previous prefix - (define-key global-map vc-prefix-key nil)) - (set symbol prefix)) ; save the new prefix - :version "23.1" - :group 'vc) +(define-key global-map "\C-xv" 'vc-prefix-map) (defvar vc-menu-map (let ((map (make-sparse-keymap "Version Control")))