From: Michael Albinus <michael.albinus@gmx.de>
Date: Mon, 1 Oct 2018 12:34:35 +0000 (+0200)
Subject: Use `float-time' in tramp-sh.el where needed
X-Git-Tag: emacs-27.0.90~4354
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c45789a595cc09457d54c4c878e8aae84f79d59d;p=emacs.git

Use `float-time' in tramp-sh.el where needed

* lisp/net/tramp-sh.el (tramp-sh-handle-verify-visited-file-modtime):
Use `float-time'.
---

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index b2be43395f8..956fe2ddb73 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -1449,7 +1449,7 @@ of."
       ;; recorded last modification time, or there is no established
       ;; connection.
       (if (or (not f)
-	      (zerop (visited-file-modtime))
+	      (zerop (float-time (visited-file-modtime)))
 	      (not (file-remote-p f nil 'connected)))
 	  t
 	(with-parsed-tramp-file-name f nil