From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 28 Mar 2021 19:06:24 +0000 (+0200)
Subject: Fix hang in autorevert-tests.el
X-Git-Tag: emacs-28.0.90~3096^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8a92030f6a;p=emacs.git

Fix hang in autorevert-tests.el

* test/lisp/autorevert-tests.el (auto-revert--wait-for-revert):
Apply more robust check, whether file notification is used.
---

diff --git a/test/lisp/autorevert-tests.el b/test/lisp/autorevert-tests.el
index 6ced9a1ac8f..8b8313df015 100644
--- a/test/lisp/autorevert-tests.el
+++ b/test/lisp/autorevert-tests.el
@@ -131,7 +131,9 @@ This expects `auto-revert--messages' to be bound by
                        (format-message
                         "Reverting buffer `%s'\\." (buffer-name buffer))
                        auto-revert--messages)))
-      (if (with-current-buffer buffer auto-revert-use-notify)
+      (if (and (or file-notify--library
+                   (file-remote-p temporary-file-directory))
+               (with-current-buffer buffer auto-revert-use-notify))
           (read-event nil nil 0.1)
         (sleep-for 0.1)))))