From f3c513a598cfb56085e632b9b4c3c32cc06459ed Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 19 Jan 2025 14:42:46 +0200 Subject: [PATCH] ; Fix autorevert-tests on MS-Windows * test/lisp/autorevert-tests.el (auto-revert-test04-auto-revert-mode-dired): Fix test on MS-Windows. (cherry picked from commit be786ab3bb263cb88e548f439562cbdf93587a3f) --- test/lisp/autorevert-tests.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/test/lisp/autorevert-tests.el b/test/lisp/autorevert-tests.el index 8133b5812a7..5e46216cc42 100644 --- a/test/lisp/autorevert-tests.el +++ b/test/lisp/autorevert-tests.el @@ -390,11 +390,17 @@ This expects `auto-revert--messages' to be bound by (should auto-revert-mode) (should (string-match name (substring-no-properties (buffer-string)))) + ;; If we don't sleep for a while, this test fails on + ;; MS-Windows. + (if (eq system-type 'windows-nt) + (sleep-for 0.5)) (ert-with-message-capture auto-revert--messages ;; Delete file. (delete-file tmpfile) (auto-revert--wait-for-revert buf)) + (if (eq system-type 'windows-nt) + (sleep-for 1)) ;; Check, that the buffer has been reverted. (should-not (string-match name (substring-no-properties (buffer-string)))) -- 2.39.5