Mercurial > emacs

diff lisp/vc-arch.el @ 104594:1c682f1cb8e6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* vc-arch.el (vc-arch-diff): Let-bind `process-file-side-effects' with nil.
author Michael Albinus <michael.albinus@gmx.de>
date Tue, 25 Aug 2009 08:49:24 +0000
parents a9dc0e7c3f2b
children 1d1d5d9bd884
line wrap: on
line diff
--- a/lisp/vc-arch.el	Tue Aug 25 08:47:39 2009 +0000
+++ b/lisp/vc-arch.el	Tue Aug 25 08:49:24 2009 +0000
@@ -456,7 +456,8 @@
         (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