From 9fb5c929d3c8e9e83d28d2caeeb26bed3cca5f79 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Tue, 25 Aug 2009 08:49:24 +0000 Subject: [PATCH] * vc-arch.el (vc-arch-diff): Let-bind `process-file-side-effects' with nil. --- lisp/vc-arch.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 (setq newvers nil)) (if newvers (error "Diffing specific revisions not implemented") - (let* ((async (not vc-disable-async-diff)) + (let* (process-file-side-effects + (async (not vc-disable-async-diff)) ;; Run the command from the root dir. (default-directory (vc-arch-root file)) (status -- 2.39.5