# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 720264784 0
# Node ID 64f5e84c822b32bbcea389c5b980dca4716b6b88
# Parent  b207a60243f627c6e242ab9056a5f52e343e0240
(vc-admin): Pass t as noquery arg to vc-resynch-window.

diff -r b207a60243f6 -r 64f5e84c822b lisp/vc.el
--- a/lisp/vc.el	Wed Oct 28 09:15:05 1992 +0000
+++ b/lisp/vc.el	Wed Oct 28 09:33:04 1992 +0000
@@ -5,7 +5,7 @@
 ;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
 ;; 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 @@
 (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 @@
 	(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."