andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(vc-workfile-unchanged-p): Disable mtime check when we go via Tramp or

Browse source 
Ange-FTP.  Suggested by Kai Grossjohann.
This commit is contained in:
André Spiegel 2005-04-01 17:21:52 +00:00
parent b75122e4bd
commit 04e777784e
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/vc-hooks.el
View file

@ -481,7 +481,9 @@ and does not employ any heuristic at all."
"Return non-nil if FILE has not changed since the last checkout."
(let ((checkout-time (vc-file-getprop file 'vc-checkout-time))
(lastmod (nth 5 (file-attributes file))))
(if checkout-time
(if (and checkout-time
;; Tramp and Ange-FTP return this when they don't know the time.
(not (equal lastmod '(0 0))))
(equal checkout-time lastmod)
(let ((unchanged (vc-call workfile-unchanged-p file)))
(vc-file-setprop file 'vc-checkout-time (if unchanged lastmod 0))