# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 867032380 0
# Node ID bb63fa8602675bf0e1eba722d0309cff2f848a1d
# Parent  3718b01db9d063c0a3081e020dc5a579287311b1
(vc-menu-map): Add bindings for vc-retrieve-snapshot and vc-create-snapshot.

diff -r 3718b01db9d0 -r bb63fa860267 lisp/vc-hooks.el
--- a/lisp/vc-hooks.el	Mon Jun 23 02:10:46 1997 +0000
+++ b/lisp/vc-hooks.el	Mon Jun 23 02:19:40 1997 +0000
@@ -1048,6 +1048,10 @@
     ()
   ;;(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))