[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 4969489: Adapt test in file-notify-tests.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 4969489: Adapt test in file-notify-tests.el |
Date: |
Wed, 16 Sep 2015 18:26:39 +0000 |
branch: master
commit 4969489ce0da37b8f6e589a2c8c95a191ef88091
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
Adapt test in file-notify-tests.el
* test/automated/file-notify-tests.el
(file-notify-test04-file-validity): Skip for w32notify in
batch-mode. Add test lost last commit.
---
test/automated/file-notify-tests.el | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/test/automated/file-notify-tests.el
b/test/automated/file-notify-tests.el
index b962aa7..848225d 100644
--- a/test/automated/file-notify-tests.el
+++ b/test/automated/file-notify-tests.el
@@ -377,6 +377,9 @@ Don't wait longer than TIMEOUT seconds for the events to be
delivered."
(ert-deftest file-notify-test04-file-validity ()
"Check `file-notify-valid-p' for files."
(skip-unless (file-notify--test-local-enabled))
+ ;; The batch-mode operation of w32notify is fragile (there's no
+ ;; input threads to send the message to).
+ (skip-unless (not (and noninteractive (eq file-notify--library 'w32notify))))
(unwind-protect
(let ((temporary-file-directory (make-temp-file
"file-notify-test-parent" t)))
@@ -396,7 +399,8 @@ Don't wait longer than TIMEOUT seconds for the events to be
delivered."
;; After deleting the parent, the descriptor must not be valid
;; anymore.
(delete-directory temporary-file-directory t)
- (read-event nil nil 0.5))
+ (read-event nil nil 0.5)
+ (should-not (file-notify-valid-p file-notify--test-desc)))
;; Exit.
(file-notify--test-cleanup)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 4969489: Adapt test in file-notify-tests.el,
Michael Albinus <=