From db59472c272b9637de8889ad6cd29e75f3d65cdb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 28 Oct 1992 09:33:04 +0000 Subject: (vc-admin): Pass t as noquery arg to vc-resynch-window. --- lisp/vc.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'lisp/vc.el') diff --git a/lisp/vc.el b/lisp/vc.el index 676c1f6904e..3dcb81ce2c3 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond ;; Version: 4.0 -;; $Id: vc.el,v 1.13 1992/10/06 08:59:39 rms Exp rms $ +;; $Id: vc.el,v 1.14 1992/10/26 05:33:20 rms Exp rms $ ;; This file is part of GNU Emacs. @@ -103,6 +103,9 @@ is sensitive to blank lines.") (defvar vc-log-operation nil) (defvar vc-log-after-operation-hook nil) +(defvar vc-log-file) +(defvar vc-log-version) + (defconst vc-name-assoc-file "VC-names") (defmacro vc-error-occurred (&rest body) @@ -358,7 +361,8 @@ level to check it in under." (message "Enter initial comment. Type C-c C-c when done.")) (progn (vc-backend-admin file rev) - (vc-resynch-window file vc-keep-workfiles)))) + ;; Inhibit query here, since otherwise we always get asked. + (vc-resynch-window file vc-keep-workfiles t)))) (defun vc-steal-lock (file rev &optional owner) "Steal the lock on the current workfile." -- cgit v1.2.3