Mercurial > emacs

changeset 19103:3a841692390c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-menu-map): Replace entries for "Check In" and "Check Out" with new entry "Check In/Out" (calling vc-next-action).
author André Spiegel <spiegel@gnu.org>
date Sun, 03 Aug 1997 12:48:31 +0000
parents b605b8dbb880
children 3c4cbef834b6
files lisp/vc-hooks.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-hooks.el	Sun Aug 03 12:47:26 1997 +0000
+++ b/lisp/vc-hooks.el	Sun Aug 03 12:48:31 1997 +0000
@@ -1093,8 +1093,7 @@
     '("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 @@
 (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)