(vc-arch-diff): Don't diff asynchronously if vc-disable-async-diff is

t.
This commit is contained in:
André Spiegel 2005-01-09 21:29:27 +00:00
parent 92bafc3058
commit 160a154482

View file

@ -377,7 +377,7 @@ Return non-nil if FILE is unchanged."
(setq newvers nil))
(if newvers
(error "Diffing specific revisions not implemented.")
(let* ((async (fboundp 'start-process))
(let* ((async (and (not vc-disable-async-diff) (fboundp 'start-process)))
;; Run the command from the root dir.
(default-directory (vc-arch-root file))
(status