From: Sam Steingold <sds@gnu.org>
Date: Mon, 11 Feb 2008 00:54:35 +0000 (+0000)
Subject: (vc-prefix-key): Remove (undo 2008-02-06 patch).
X-Git-Tag: emacs-pretest-23.0.90~8023
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c1fdf758534b8ea7c133ea4c6e42a695ef900cdd;p=emacs.git

(vc-prefix-key): Remove (undo 2008-02-06 patch).
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4ee7ee0e2ad..1b9b95dc8a8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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>
 
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 945568ebc93..4f1858a2108 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -972,14 +972,7 @@ Used in `find-file-not-found-functions'."
     ;; (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")))