Commit d009603c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(diff-command): New variable.

(diff): Use it.
parent caaaf02a
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment