[Emacs-diffs] Changes to emacs/lisp/vc-hooks.el

[André Spiegel]

Index: emacs/lisp/vc-hooks.el
diff -c emacs/lisp/vc-hooks.el:1.173 emacs/lisp/vc-hooks.el:1.174
*** emacs/lisp/vc-hooks.el:1.173        Wed Feb  9 15:50:40 2005
--- emacs/lisp/vc-hooks.el      Fri Apr  1 17:21:52 2005
***************
*** 481,487 ****
    "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
          (equal checkout-time lastmod)
        (let ((unchanged (vc-call workfile-unchanged-p file)))
          (vc-file-setprop file 'vc-checkout-time (if unchanged lastmod 0))
--- 481,489 ----
    "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 (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))