From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 28 Oct 1994 18:45:45 +0000 (+0000)
Subject: (diff-command): New variable.
X-Git-Tag: emacs-19.34~6119
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d009603cbf5f88499b182c1e9f3e18b3a2a46ab4;p=emacs.git

(diff-command): New variable.
(diff): Use it.
---

diff --git a/lisp/diff.el b/lisp/diff.el
index ff7906a80c4..eb2e4152896 100644
--- a/lisp/diff.el
+++ b/lisp/diff.el
@@ -34,6 +34,9 @@
 (defvar diff-switches "-c"
   "*A string or list of strings specifying switches to be be passed to diff.")
 
+(defvar diff-command "diff"
+  "*The command to use to run diff.")
+
 (defvar diff-regexp-alist
   '(
     ;; -u format: @@ -OLDSTART,OLDEND +NEWSTART,NEWEND @@
@@ -196,7 +199,7 @@ With prefix arg, prompt for diff switches."
     (unwind-protect
 	(let ((command
 	       (mapconcat 'identity
-			  (append '("diff")
+			  (append (list diff-command)
 				  ;; Use explicitly specified switches
 				  (if switches
 				      (if (consp switches)