diff options
| author | Karl Heuer | 1995-06-07 18:55:22 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-06-07 18:55:22 +0000 |
| commit | 76a8bf4c1f1192be6f4589e0205df0b0f7115c03 (patch) | |
| tree | f53598710c86f40a679dd6ae680c18a49356d6b6 /lisp | |
| parent | 630f4018317ecd0ef5085040b3f91910f31b3630 (diff) | |
| download | emacs-76a8bf4c1f1192be6f4589e0205df0b0f7115c03.tar.gz emacs-76a8bf4c1f1192be6f4589e0205df0b0f7115c03.zip | |
(vc-menu-map): Disable Register when no visited file.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/vc-hooks.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index 4b41ef1ca40..c875a581024 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el | |||
| @@ -829,7 +829,7 @@ Returns t if checkout was successful, nil otherwise." | |||
| 829 | (put 'vc-insert-headers 'menu-enable 'vc-mode) | 829 | (put 'vc-insert-headers 'menu-enable 'vc-mode) |
| 830 | (put 'vc-next-action 'menu-enable '(and vc-mode (not buffer-read-only))) | 830 | (put 'vc-next-action 'menu-enable '(and vc-mode (not buffer-read-only))) |
| 831 | (put 'vc-toggle-read-only 'menu-enable '(and vc-mode buffer-read-only)) | 831 | (put 'vc-toggle-read-only 'menu-enable '(and vc-mode buffer-read-only)) |
| 832 | (put 'vc-register 'menu-enable '(not vc-mode)) | 832 | (put 'vc-register 'menu-enable '(and buffer-file-name (not vc-mode))) |
| 833 | ) | 833 | ) |
| 834 | 834 | ||
| 835 | (provide 'vc-hooks) | 835 | (provide 'vc-hooks) |