From 0d2ce4efca2baa742c3740a3d1c542ea7378d9c4 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 23 Apr 2004 21:01:07 +0000 Subject: [PATCH] (vc-default-workfile-unchanged-p): Fix code that handles wrong-number-of-arguments in backend call. --- lisp/vc-hooks.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index e7278dcd2fa..d6cd8208540 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el @@ -6,7 +6,7 @@ ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Andre Spiegel -;; $Id: vc-hooks.el,v 1.166 2004/04/11 15:03:21 spiegel Exp $ +;; $Id: vc-hooks.el,v 1.167 2004/04/16 10:21:51 spiegel Exp $ ;; This file is part of GNU Emacs. @@ -44,8 +44,8 @@ "set `vc-handled-backends' to nil to disable VC.") (defvar vc-master-templates ()) -(make-obsolete-variable 'vc-master-templates - "to define master templates for a given BACKEND, use +(make-obsolete-variable 'vc-master-templates + "to define master templates for a given BACKEND, use vc-BACKEND-master-templates. To enable or disable VC for a given BACKEND, use `vc-handled-backends'.") @@ -474,8 +474,8 @@ Return non-nil if FILE is unchanged." (indirect-function (vc-find-backend-function (vc-backend file) 'diff)))) - (not (eq (caddr err) 5))) - (signal 'wrong-number-of-arguments err) + (not (eq (caddr err) 4))) + (signal (car err) (cdr err)) (vc-call diff file)))))) (defun vc-workfile-version (file) -- 2.39.5