[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Error in tramp.el .25

From: Angus Lees
Subject: Re: Error in tramp.el .25
Date: Wed, 13 Nov 2002 13:23:10 +1100
User-agent: Wanderlust/2.9.15 (Unchained Melody) XEmacs/21.4 (Common Lisp)

i reported the following to the debian bug tracking system in october.
i'm not sure if it still applies to current cvs (was against 2.0.22)


tramp-handle-file-newer-than-file-p uses a nonexistent function (on
xemacs 21) "subtract-time"

luckily tramp already has a wrapper for this function
"tramp-time-diff", so this can presumably (i haven't actually tried)
be replaced with a call to that instead.


           (let ((fa1 (file-attributes file1))
                 (fa2 (file-attributes file2)))
             (if (and (not (equal (nth 5 fa1) '(0 0)))
                      (not (equal (nth 5 fa2) '(0 0))))
-                (> 0 (car (subtract-time (nth 5 fa1) (nth 5 fa2))))
+                (> 0 (tramp-time-diff (nth 5 fa1) (nth 5 fa2)))
               ;; If one of them is the dont-know value, then we can
               ;; still try to run a shell command on the remote host.
               ;; However, this only works if both files are Tramp
               ;; files and both have the same method, same user, same

 - Gus

reply via email to

[Prev in Thread] Current Thread [Next in Thread]