From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: seberino@spawar.navy.mil (Christian Seberino)
Newsgroups: gmane.emacs.help
Subject: Re: How make vc-diff and vc-revert-buffer NOT ask to save files but
	do it automatically?
Date: 25 Sep 2003 16:32:20 -0700
Organization: http://groups.google.com/
Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <bf23f78f.0309251532.2fb2b92a@posting.google.com>
References: <bf23f78f.0309231235.fff730c@posting.google.com>
	<3F70C451.6040603@yahoo.com>
NNTP-Posting-Host: deer.gmane.org
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: sea.gmane.org 1064534546 9426 80.91.224.253 (26 Sep 2003 00:02:26 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Fri, 26 Sep 2003 00:02:26 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Fri Sep 26 02:02:24 2003
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 1A2g40-0008VH-00
	for <geh-help-gnu-emacs@m.gmane.org>; Fri, 26 Sep 2003 02:02:24 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.22)
	id 1A2fo6-0002vq-4S
	for geh-help-gnu-emacs@m.gmane.org; Thu, 25 Sep 2003 19:45:58 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews1.google.com!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 36
Original-NNTP-Posting-Host: 198.253.72.211
Original-X-Trace: posting.google.com 1064532741 23364 127.0.0.1 (25 Sep 2003 23:32:21
	GMT)
Original-X-Complaints-To: groups-abuse@google.com
Original-NNTP-Posting-Date: 25 Sep 2003 23:32:21 GMT
Original-Xref: shelby.stanford.edu gnu.emacs.help:116883
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1.2
Precedence: list
List-Id: Users list for the GNU Emacs text editor  <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:12809
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:12809

I tried to wrap your code into my vc-diff wrapper and got an error message...

   (defun cs-vc-diff() (interactive)
      (let ((unread-command-events '(?y ?e ?s)))
         (vc-diff)) ; (call-interactively 'vc-diff)?
   )

Here is the error message...

let: Wrong number of arguments: #[(historic &optional not-urgent) 
....etc.

CS


> 
> >    (defun cs-vc-diff() (interactive)
> >       (vc-diff "yes"))
> >  
> >    (defun cs-vc-revert-buffer() (interactive)
> >       (save-buffer)
> >       (vc-revert-buffer "yes"))
> > 
> > These did not work but instead I got an error message about the "wrong
> > number of arguments" and other junk.
> > 
> > How fix?
> 
> 
> (let ((unread-command-events '(?y ?e ?s)))
>    (vc-foo))	; (call-interactively 'vc-foo)?
> 
> 
> > any help would be greatly appreaciated
> 
> Type `C-h f'.