From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 16 Mar 1994 23:39:59 +0000 (+0000)
Subject: Bind C-x v d to vc-directory.
X-Git-Tag: 20090517-FFI~7227
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=bcb4975fa8f6be652a7ce0deadedc9e1e8fe67f0;p=mit-scheme.git

Bind C-x v d to vc-directory.
---

diff --git a/v7/src/edwin/modefs.scm b/v7/src/edwin/modefs.scm
index 8a8376838..f0f5eee94 100644
--- a/v7/src/edwin/modefs.scm
+++ b/v7/src/edwin/modefs.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;	$Id: modefs.scm,v 1.146 1994/03/11 05:25:18 cph Exp $
+;;;	$Id: modefs.scm,v 1.147 1994/03/16 23:39:59 cph Exp $
 ;;;
 ;;;	Copyright (c) 1985, 1989-94 Massachusetts Institute of Technology
 ;;;
@@ -310,6 +310,7 @@ Like Fundamental mode, but no self-inserting characters.")
 (define-key 'fundamental '(#\c-x #\u) 'undo)
 (define-prefix-key 'fundamental '(#\c-x #\v))
 (define-key 'fundamental '(#\c-x #\v #\c) 'vc-cancel-version)
+(define-key 'fundamental '(#\c-x #\v #\d) 'vc-directory)
 (define-key 'fundamental '(#\c-x #\v #\h) 'vc-insert-headers)
 (define-key 'fundamental '(#\c-x #\v #\i) 'vc-register)
 (define-key 'fundamental '(#\c-x #\v #\l) 'vc-print-log)