diff options
Diffstat (limited to 'lisp/vc-arch.el')
| -rw-r--r-- | lisp/vc-arch.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el index c8efca02832..6c67581a5a8 100644 --- a/lisp/vc-arch.el +++ b/lisp/vc-arch.el @@ -375,7 +375,7 @@ Return non-nil if FILE is unchanged." (vc-arch-command nil 0 file "commit" "-s" summary "-L" comment "--" (vc-switches 'Arch 'checkin)))) -(defun vc-arch-diff (file &optional oldvers newvers) +(defun vc-arch-diff (file &optional oldvers newvers buffer) "Get a difference report using Arch between two versions of FILE." (if (and newvers (vc-up-to-date-p file) @@ -390,7 +390,7 @@ Return non-nil if FILE is unchanged." (default-directory (vc-arch-root file)) (status (vc-arch-command - "*vc-diff*" + (or buffer "*vc-diff*") (if async 'async 1) nil "file-diffs" ;; Arch does not support the typical flags. |