]> code.delx.au - gnu-emacs/blobdiff - test/lisp/autorevert-tests.el
Merge emacs-25 into master (using imerge)
[gnu-emacs] / test / lisp / autorevert-tests.el
index 6f186973ee75f7e34c34dd07d01efcec3389f073..043f80de49e85d44b78e5790d78e3d6be4e88bad 100644 (file)
@@ -39,7 +39,9 @@
           (null (string-match
                  (format-message "Reverting buffer `%s'." (buffer-name buffer))
                  (buffer-string)))
-        (read-event nil nil 0.1)))))
+       (if (with-current-buffer buffer auto-revert-use-notify)
+           (read-event nil nil 0.1)
+         (sleep-for 0.1))))))
 
 (ert-deftest auto-revert-test00-auto-revert-mode ()
   "Check autorevert for a file."