diff options
author | André Spiegel <spiegel@gnu.org> | 2006-07-05 08:05:29 +0000 |
---|---|---|
committer | André Spiegel <spiegel@gnu.org> | 2006-07-05 08:05:29 +0000 |
commit | 51ef683bad0756520a8de112d6896b2ba976fee0 (patch) | |
tree | 0a714ae3347a1455fb335c502627641164b22567 /lisp/vc.el | |
parent | 180f018c6c0dc91f72afbf0ff6a49c1477d4cd4b (diff) | |
download | emacs-51ef683bad0756520a8de112d6896b2ba976fee0.tar.gz |
(vc-diff-internal): Fix prev change.
Diffstat (limited to 'lisp/vc.el')
-rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index c395a25798c..8290fd5b943 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -1846,7 +1846,7 @@ actually call the backend, but performs a local diff." (if (and file-rev1 file-rev2) (let ((status (if (eq vc-diff-knows-L 'no) - (apply 'vc-do-command "*vc-diff*" 1 "diff" + (apply 'vc-do-command "*vc-diff*" 1 "diff" nil (append (vc-switches nil 'diff) (list (file-relative-name file-rev1) (file-relative-name file-rev2)))) @@ -1864,7 +1864,7 @@ actually call the backend, but performs a local diff." (if (eq status 2) (if (not vc-diff-knows-L) (setq vc-diff-knows-L 'no - status (apply 'vc-do-command "*vc-diff*" 1 "diff" + status (apply 'vc-do-command "*vc-diff*" 1 "diff" nil (append (vc-switches nil 'diff) (list (file-relative-name file-rev1) |