changeset 1224:981b00f8fe77

(vc-toggle-read-only): Doc fix. (vc-mode-line): Add interactive spec.
author Roland McGrath <roland@gnu.org>
date Sun, 27 Sep 1992 00:45:57 +0000
parents 45f9cbd79ede
children e16f52a7c9f9
files lisp/vc-hooks.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc-hooks.el	Sat Sep 26 22:58:56 1992 +0000
+++ b/lisp/vc-hooks.el	Sun Sep 27 00:45:57 1992 +0000
@@ -5,7 +5,7 @@
 ;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
 ;; Version: 4.0
 
-;;	$Id: vc-hooks.el,v 1.44 1992/07/31 06:43:05 esr Exp $	
+;;	$Id: vc-hooks.el,v 1.2 1992/08/04 07:21:29 jimb Exp roland $	
 
 ;; This file is part of GNU Emacs.
 
@@ -96,7 +96,7 @@
 	   (vc-file-setprop file 'vc-backend (cdr (vc-registered file))))))
 
 (defun vc-toggle-read-only ()
-  "If the file in the current buffer id under version control, perform the
+  "If the file in the current buffer is under version control, perform the
 logical next version-control action; otherwise, just toggle the buffer's
 read-only flag."
   (interactive)
@@ -108,6 +108,7 @@
   "Set `vc-mode-string' to display type of version control for FILE.
 The value is set in the current buffer, which should be the buffer
 visiting FILE."
+  (interactive (list buffer-file-name nil))
   (let ((vc-type (vc-backend-deduce file)))
     (if vc-type
 	(progn