revert the `vc-status' keybindings

This commit is contained in:
Sam Steingold 2008-02-06 19:06:34 +00:00
parent 527b313d4d
commit dce1354779
2 changed files with 5 additions and 5 deletions

View file

@ -1,8 +1,6 @@
2008-02-06 Sam Steingold <sds@gnu.org>
* vc-hooks.el (vc-prefix-map): Bind `vc-status' to "?".
(vc-prefix-key): New user-customizable variable.
(vc-menu-map): Add `vc-status'.
* vc-hooks.el (vc-prefix-key): New user-customizable variable.
2008-02-06 Stefan Monnier <monnier@iro.umontreal.ca>

View file

@ -968,7 +968,8 @@ Used in `find-file-not-found-functions'."
(define-key map "+" 'vc-update)
(define-key map "=" 'vc-diff)
(define-key map "~" 'vc-revision-other-window)
(define-key map "?" 'vc-status)
;; `vc-status' is a not-quite-ready replacement for `vc-directory'
;; (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."
@ -989,7 +990,8 @@ Used in `find-file-not-found-functions'."
(define-key map [vc-create-snapshot]
'("Create Snapshot" . vc-create-snapshot))
(define-key map [vc-directory] '("VC Directory Listing" . vc-directory))
(define-key map [vc-status] '("VC Status" . vc-status))
;; `vc-status' is a not-quite-ready replacement for `vc-directory'
;; (define-key map [vc-status] '("VC Status" . vc-status))
(define-key map [separator1] '("----"))
(define-key map [vc-annotate] '("Annotate" . vc-annotate))
(define-key map [vc-rename-file] '("Rename File" . vc-rename-file))