From f88d4e424877c5709bb49d7d905004dea06ce089 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Fri, 4 Feb 2022 19:24:43 +0100 Subject: [PATCH] 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 b41824a6cf3..9be1985780d 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)) -- 2.39.5