[Emacs-diffs] emacs/lisp vc-arch.el

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       09/08/25 08:49:24

Modified files:
        lisp           : vc-arch.el 

Log message:
        * vc-arch.el (vc-arch-diff): Let-bind `process-file-side-effects' with 
nil.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/vc-arch.el?cvsroot=emacs&r1=1.51&r2=1.52

Patches:
Index: vc-arch.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-arch.el,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -b -r1.51 -r1.52
--- vc-arch.el  5 Jan 2009 03:19:51 -0000       1.51
+++ vc-arch.el  25 Aug 2009 08:49:24 -0000      1.52
@@ -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