diff options
| author | Michael Albinus | 2018-10-01 14:34:35 +0200 |
|---|---|---|
| committer | Michael Albinus | 2018-10-01 14:34:35 +0200 |
| commit | c45789a595cc09457d54c4c878e8aae84f79d59d (patch) | |
| tree | 2c713d6eb33ff83dc726091481861d2358b57d21 | |
| parent | 886a1f26413b3eec427155163a2f3ceb163efce8 (diff) | |
| download | emacs-c45789a595cc09457d54c4c878e8aae84f79d59d.tar.gz emacs-c45789a595cc09457d54c4c878e8aae84f79d59d.zip | |
Use `float-time' in tramp-sh.el where needed
* lisp/net/tramp-sh.el (tramp-sh-handle-verify-visited-file-modtime):
Use `float-time'.
| -rw-r--r-- | lisp/net/tramp-sh.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 1449 | ;; recorded last modification time, or there is no established | 1449 | ;; recorded last modification time, or there is no established |
| 1450 | ;; connection. | 1450 | ;; connection. |
| 1451 | (if (or (not f) | 1451 | (if (or (not f) |
| 1452 | (zerop (visited-file-modtime)) | 1452 | (zerop (float-time (visited-file-modtime))) |
| 1453 | (not (file-remote-p f nil 'connected))) | 1453 | (not (file-remote-p f nil 'connected))) |
| 1454 | t | 1454 | t |
| 1455 | (with-parsed-tramp-file-name f nil | 1455 | (with-parsed-tramp-file-name f nil |