# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 783369945 0
# Node ID 093d80b4ae1769ca8a39ffeeef5d145a5315797b
# Parent  3f2c709d9856ff331deeb14c5c6836a956e981c7
(diff-command): New variable.
(diff): Use it.

diff -r 3f2c709d9856 -r 093d80b4ae17 lisp/diff.el
--- a/lisp/diff.el	Fri Oct 28 15:39:01 1994 +0000
+++ b/lisp/diff.el	Fri Oct 28 18:45:45 1994 +0000
@@ -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 @@
     (unwind-protect
 	(let ((command
 	       (mapconcat 'identity
-			  (append '("diff")
+			  (append (list diff-command)
 				  ;; Use explicitly specified switches
 				  (if switches
 				      (if (consp switches)