diff options
| author | Richard M. Stallman | 1993-05-04 16:40:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-04 16:40:24 +0000 |
| commit | ee7e9c886a85ae90845c20176ccc8da8ad831522 (patch) | |
| tree | 2db399bbeced32634bc1fc49e98f9f8da917eaaf | |
| parent | a6eb67976982ccf22d8245e364e0641fdca8e11b (diff) | |
| download | emacs-ee7e9c886a85ae90845c20176ccc8da8ad831522.tar.gz emacs-ee7e9c886a85ae90845c20176ccc8da8ad831522.zip | |
(vc-dired-prefix-map): New keymap.
Use it in minor-mode-map-alist for vc-dired-mode.
| -rw-r--r-- | lisp/vc.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 2e0fa62eac0..3bd5cda97a5 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -809,14 +809,18 @@ the variable vc-header-alist" | |||
| 809 | ;; The VC directory submode. Coopt Dired for this. | 809 | ;; The VC directory submode. Coopt Dired for this. |
| 810 | ;; All VC commands get mapped into logical equivalents. | 810 | ;; All VC commands get mapped into logical equivalents. |
| 811 | 811 | ||
| 812 | (defvar vc-dired-prefix-map (make-sparse-keymap)) | ||
| 813 | (define-key vc-dired-prefix-map "\C-xv" vc-prefix-map) | ||
| 814 | |||
| 812 | (or (assq 'vc-dired-mode minor-mode-map-alist) | 815 | (or (assq 'vc-dired-mode minor-mode-map-alist) |
| 813 | (setq minor-mode-map-alist | 816 | (setq minor-mode-map-alist |
| 814 | (cons 'vc-dired-mode minor-mode-map-alist))) | 817 | (cons '(vc-dired-mode vc-dired-prefix-map) |
| 818 | minor-mode-map-alist))) | ||
| 815 | 819 | ||
| 816 | (defun vc-dired-mode () | 820 | (defun vc-dired-mode () |
| 817 | "The augmented Dired minor mode used in VC directory buffers. | 821 | "The augmented Dired minor mode used in VC directory buffers. |
| 818 | All Dired commands operate normally. Users currently locking listed files | 822 | All Dired commands operate normally. Users currently locking listed files |
| 819 | are listed at the left-hand side of the buffer, following the Dired mark area. | 823 | are listed in place of the file's owner and group. |
| 820 | Keystrokes bound to VC commands will execute as though they had been called | 824 | Keystrokes bound to VC commands will execute as though they had been called |
| 821 | on a buffer attached to the file named in the current Dired buffer line." | 825 | on a buffer attached to the file named in the current Dired buffer line." |
| 822 | (setq vc-dired-mode t) | 826 | (setq vc-dired-mode t) |