mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(diff-command): New variable.

Browse Source 
(diff): Use it.
This commit is contained in:
Richard M. Stallman 1994-10-28 18:45:45 +00:00
parent caaaf02a1a
commit d009603cbf
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/diff.el
View File

@ -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)