Mercurial > emacs

diff lisp/diff.el @ 9736:093d80b4ae17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(diff-command): New variable. (diff): Use it.
author Richard M. Stallman <rms@gnu.org>
date Fri, 28 Oct 1994 18:45:45 +0000
parents a4f0f421752e
children 4302535a19eb
line wrap: on
line diff
--- 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)