diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-23 02:19:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-23 02:19:40 +0000 |
| commit | 9bef02e187dd99b2d8a6a9a2d815c4ec5df4fe8a (patch) | |
| tree | ff683bb078f2dad234322411d06d6051236afe39 /lisp/vc-hooks.el | |
| parent | b96d6bbdda20d6a91280b14a7838d66bf0463682 (diff) | |
| download | emacs-9bef02e187dd99b2d8a6a9a2d815c4ec5df4fe8a.tar.gz | |
(vc-menu-map): Add bindings for vc-retrieve-snapshot and vc-create-snapshot.
Diffstat (limited to 'lisp/vc-hooks.el')
| -rw-r--r-- | lisp/vc-hooks.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index ee86293b5c9..0b5cba99422 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el @@ -1048,6 +1048,10 @@ Returns t if checkout was successful, nil otherwise." () ;;(define-key vc-menu-map [show-files] ;; '("Show Files under VC" . (vc-directory t))) + (define-key vc-menu-map [vc-retrieve-snapshot] + '("Retrieve Snapshot" . vc-retrieve-snapshot)) + (define-key vc-menu-map [vc-create-snapshot] + '("Create Snapshot" . vc-create-snapshot)) (define-key vc-menu-map [vc-directory] '("Show Locked Files" . vc-directory)) (define-key vc-menu-map [separator1] '("----")) (define-key vc-menu-map [vc-annotate] '("Annotate" . vc-annotate)) |