From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 22 Jun 2002 20:24:42 +0000 (+0000)
Subject: (cvs-version): Use cvs-program rather than "cvs".
X-Git-Tag: ttn-vms-21-2-B4~14490
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6cfbaf462f82911f6c9cdd19d458483b6211da9d;p=emacs.git

(cvs-version): Use cvs-program rather than "cvs".
---

diff --git a/lisp/pcvs-defs.el b/lisp/pcvs-defs.el
index eaf8d5f78a0..94f5a75bbdc 100644
--- a/lisp/pcvs-defs.el
+++ b/lisp/pcvs-defs.el
@@ -4,7 +4,7 @@
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: pcl-cvs
-;; Revision: $Id: pcvs-defs.el,v 1.16 2001/10/31 17:39:07 sds Exp $
+;; Revision: $Id: pcvs-defs.el,v 1.17 2001/12/20 18:42:44 pj Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -40,7 +40,7 @@
 (defvar cvs-version
   (ignore-errors
     (with-temp-buffer
-      (call-process "cvs" nil t nil "-v")
+      (call-process cvs-program nil t nil "-v")
       (goto-char (point-min))
       (when (re-search-forward "(CVS) \\([0-9]+\\)\\.\\([0-9]+\\)" nil t)
 	(cons (string-to-number (match-string 1))