(diff-command): New variable.

(diff): Use it.

diff --git a/lisp/diff.el b/lisp/diff.el
index ff7906a80c46e0ca52f53ea98c9d47537bfa8168..eb2e41528962a382ae6d3892dee978c0b0dbecc7 100644 (file)
--- 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)