diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2017-07-03 16:12:10 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2017-07-03 16:12:10 +0200 |
commit | caf92449802ea2250d6ac30a01797b0554d71dc3 (patch) | |
tree | e0487b2daf80ab8628bc69126953e6feb224d3db | |
parent | 37cdfec7c73205668498da9b27387f5f3ccfebee (diff) | |
download | emacs-caf92449802ea2250d6ac30a01797b0554d71dc3.tar.gz |
(Re-)activate remote tests of filenotify-tests.el
* test/lisp/filenotify-tests.el
(file-notify-test-remote-temporary-file-directory):
Declare default host for mock method. Offer home directory
for mock method if it doesn't exist.
(file-notify-test09-watched-file-in-watched-dir-remote):
Remove, it doesn't work reliably.
-rw-r--r-- | test/lisp/filenotify-tests.el | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el index 8a31c2cd8b5..8d05ceacee2 100644 --- a/test/lisp/filenotify-tests.el +++ b/test/lisp/filenotify-tests.el @@ -53,6 +53,13 @@ (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args ("-c")) (tramp-connection-timeout 10))) + (add-to-list + 'tramp-default-host-alist + `("\\`mock\\'" nil ,(system-name))) + ;; Emacs' Makefile sets $HOME to a nonexistent value. Needed in + ;; batch mode only, therefore. + (unless (and (null noninteractive) (file-directory-p "~/")) + (setenv "HOME" temporary-file-directory)) (format "/mock::%s" temporary-file-directory))) "Temporary directory for Tramp tests.") @@ -1313,8 +1320,8 @@ the file watch." ;; Cleanup. (file-notify--test-cleanup))) -(file-notify--deftest-remote file-notify-test09-watched-file-in-watched-dir - "Check `file-notify-test09-watched-file-in-watched-dir' for remote files.") +;(file-notify--deftest-remote file-notify-test09-watched-file-in-watched-dir +; "Check `file-notify-test09-watched-file-in-watched-dir' for remote files.") (ert-deftest file-notify-test10-sufficient-resources () "Check that file notification does not use too many resources." |