Re: time values

[Luc Teirlinck]

I plan to commit the following minimal patch to tramp.el.  Problems
remain, which I will discuss later, but they are unrelated to the
`time valus' stuff.

===File ~/tramp-diff========================================
*** tramp.el    26 Jun 2004 16:46:18 -0500      1.46
--- tramp.el    12 Jul 2004 10:16:09 -0500      
***************
*** 2343,2349 ****
                 ;; (HIGH . LOW)?
                 (let ((mt (visited-file-modtime)))
                   (< (abs (tramp-time-diff
!                           modtime (list (car mt) (cdr mt)))) 2)))
                (attr
                 (save-excursion
                   (tramp-send-command
--- 2343,2356 ----
                 ;; (HIGH . LOW)?
                 (let ((mt (visited-file-modtime)))
                   (< (abs (tramp-time-diff
!                           modtime
!                           ;; For compatibility, deal with both the old
!                           ;; (HIGH . LOW) and the new (HIGH LOW)
!                           ;; return values of `visited-file-modtime'.
!                           (if (atom (cdr mt))
!                               (list (car mt) (cdr mt))
!                             mt)))
!                     2)))
                (attr
                 (save-excursion
                   (tramp-send-command
============================================================