diff options
author | André Spiegel <spiegel@gnu.org> | 1997-08-03 12:48:31 +0000 |
---|---|---|
committer | André Spiegel <spiegel@gnu.org> | 1997-08-03 12:48:31 +0000 |
commit | 9314395d3f3c8d5d943694a0501da54f77490376 (patch) | |
tree | 6ad79e454d3e24ff68a2b6b4636dc4dc43420878 /lisp/vc-hooks.el | |
parent | 7e6ed9b9b51fac2dd51ce08d75cc8252e63cbdc8 (diff) | |
download | emacs-9314395d3f3c8d5d943694a0501da54f77490376.tar.gz |
(vc-menu-map): Replace entries for "Check In" and "Check Out" with
new entry "Check In/Out" (calling vc-next-action).
Diffstat (limited to 'lisp/vc-hooks.el')
-rw-r--r-- | lisp/vc-hooks.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index b775e89cbfe..c1452e63c05 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el @@ -1093,8 +1093,7 @@ Returns t if checkout was successful, nil otherwise." '("Revert to Last Version" . vc-revert-buffer)) (define-key vc-menu-map [vc-insert-header] '("Insert Header" . vc-insert-headers)) - (define-key vc-menu-map [vc-menu-check-in] '("Check In" . vc-next-action)) - (define-key vc-menu-map [vc-check-out] '("Check Out" . vc-toggle-read-only)) + (define-key vc-menu-map [vc-next-action] '("Check In/Out" . vc-next-action)) (define-key vc-menu-map [vc-register] '("Register" . vc-register))) (put 'vc-rename-file 'menu-enable 'vc-mode) @@ -1108,7 +1107,6 @@ Returns t if checkout was successful, nil otherwise." (put 'vc-revert-buffer 'menu-enable 'vc-mode) (put 'vc-insert-headers 'menu-enable 'vc-mode) (put 'vc-next-action 'menu-enable 'vc-mode) -(put 'vc-toggle-read-only 'menu-enable 'vc-mode) (put 'vc-register 'menu-enable '(and buffer-file-name (not vc-mode))) (provide 'vc-hooks) |