From cdfa3eccb179fe579a5e38949d0a2ad3d2757524 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Kai=20Gro=C3=9Fjohann?= Date: Sat, 17 Jul 2004 21:33:32 +0000 Subject: [PATCH] (tramp-handle-verify-visited-file-modtime): New docstring. From Luc Teirlinck. --- lisp/ChangeLog | 5 +++++ lisp/net/tramp.el | 7 ++++++- 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1877f9c0281..876646163e3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-07-17 Kai Grossjohann + + * net/tramp.el (tramp-handle-verify-visited-file-modtime): New + docstring. From Luc Teirlinck. + 2004-07-17 Luc Teirlinck * autorevert.el: Describe `Auto Revert Tail Mode' in `Commentary' diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 7f04a948811..02b076483c1 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -2331,7 +2331,12 @@ If it doesn't exist, generate a new one." ;; This function makes the same assumption as ;; `tramp-handle-set-visited-file-modtime'. (defun tramp-handle-verify-visited-file-modtime (buf) - "Like `verify-visited-file-modtime' for tramp files." + "Like `verify-visited-file-modtime' for tramp files. +At the time `verify-visited-file-modtime' calls this function, we +already know that the buffer is visiting a file and that +`visited-file-modtime' does not return 0. Do not call this +function directly, unless those two cases are already taken care +of." (with-current-buffer buf (let ((f (buffer-file-name))) (with-parsed-tramp-file-name f nil -- 2.39.2