[Emacs-diffs] Changes to emacs/lisp/net/tramp.el [lexbind]

[Miles Bader]

Index: emacs/lisp/net/tramp.el
diff -c emacs/lisp/net/tramp.el:1.34.2.8 emacs/lisp/net/tramp.el:1.34.2.9
*** emacs/lisp/net/tramp.el:1.34.2.8    Tue Jul  6 10:23:37 2004
--- emacs/lisp/net/tramp.el     Sat Jul 17 02:51:55 2004
***************
*** 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