emacs-diffs
[Top][All Lists]
Advanced

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

master f88d4e4248: Improve Tramp tests backward compatibility


From: Michael Albinus
Subject: master f88d4e4248: Improve Tramp tests backward compatibility
Date: Fri, 4 Feb 2022 13:24:54 -0500 (EST)

branch: master
commit f88d4e424877c5709bb49d7d905004dea06ce089
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Improve Tramp tests backward compatibility
    
    * test/lisp/net/tramp-tests.el (tramp-test39-detect-external-change):
    Improve backward compatibility.
---
 test/lisp/net/tramp-tests.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index b41824a6cf..9be1985780 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -6018,13 +6018,13 @@ Use direct async.")
        (ignore-errors (delete-file tmp-name1))
        (tramp-cleanup-connection tramp-test-vec 'keep-debug 'keep-password)))))
 
-;; The function was introduced in Emacs 28.1.
+;; The functions were introduced in Emacs 28.1.
 (ert-deftest tramp-test39-detect-external-change ()
   "Check that an external file modification is reported."
   (skip-unless (tramp--test-enabled))
   (skip-unless (not (tramp--test-ange-ftp-p)))
   ;; Since Emacs 28.1.
-  (skip-unless (fboundp 'file-locked-p))
+  (skip-unless (and (fboundp 'lock-file) (fboundp 'file-locked-p)))
 
   (dolist (quoted (if (tramp--test-expensive-test-p) '(nil t) '(nil)))
     (dolist (create-lockfiles '(nil t))



reply via email to

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