aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/vc-arch.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index f9ead184731..68146bcf1f7 100644
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -456,7 +456,8 @@ CALLBACK expects (ENTRIES &optional MORE-TO-COME); see
456 (setq newvers nil)) 456 (setq newvers nil))
457 (if newvers 457 (if newvers
458 (error "Diffing specific revisions not implemented") 458 (error "Diffing specific revisions not implemented")
459 (let* ((async (not vc-disable-async-diff)) 459 (let* (process-file-side-effects
460 (async (not vc-disable-async-diff))
460 ;; Run the command from the root dir. 461 ;; Run the command from the root dir.
461 (default-directory (vc-arch-root file)) 462 (default-directory (vc-arch-root file))
462 (status 463 (status