diff options
| author | Richard M. Stallman | 1993-05-04 16:42:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-04 16:42:57 +0000 |
| commit | 1434b7aabc2151fea734c4fe26b758fa6a42d20a (patch) | |
| tree | c72a824e4fc419f72c7e0c646a7f99d54882fb8e | |
| parent | ee7e9c886a85ae90845c20176ccc8da8ad831522 (diff) | |
| download | emacs-1434b7aabc2151fea734c4fe26b758fa6a42d20a.tar.gz emacs-1434b7aabc2151fea734c4fe26b758fa6a42d20a.zip | |
(minor-mode-map-alist): Don't use it if it's void.
| -rw-r--r-- | lisp/vc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index 3bd5cda97a5..bd49eba4e45 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -812,9 +812,10 @@ the variable vc-header-alist" | |||
| 812 | (defvar vc-dired-prefix-map (make-sparse-keymap)) | 812 | (defvar vc-dired-prefix-map (make-sparse-keymap)) |
| 813 | (define-key vc-dired-prefix-map "\C-xv" vc-prefix-map) | 813 | (define-key vc-dired-prefix-map "\C-xv" vc-prefix-map) |
| 814 | 814 | ||
| 815 | (or (assq 'vc-dired-mode minor-mode-map-alist) | 815 | (or (not (boundp 'minor-mode-map-alist)) |
| 816 | (assq 'vc-dired-mode minor-mode-map-alist) | ||
| 816 | (setq minor-mode-map-alist | 817 | (setq minor-mode-map-alist |
| 817 | (cons '(vc-dired-mode vc-dired-prefix-map) | 818 | (cons '(vc-dired-mode . vc-dired-prefix-map) |
| 818 | minor-mode-map-alist))) | 819 | minor-mode-map-alist))) |
| 819 | 820 | ||
| 820 | (defun vc-dired-mode () | 821 | (defun vc-dired-mode () |