diff options
| author | Michael Albinus | 2017-07-03 16:12:10 +0200 |
|---|---|---|
| committer | Michael Albinus | 2017-07-03 16:12:10 +0200 |
| commit | caf92449802ea2250d6ac30a01797b0554d71dc3 (patch) | |
| tree | e0487b2daf80ab8628bc69126953e6feb224d3db | |
| parent | 37cdfec7c73205668498da9b27387f5f3ccfebee (diff) | |
| download | emacs-caf92449802ea2250d6ac30a01797b0554d71dc3.tar.gz emacs-caf92449802ea2250d6ac30a01797b0554d71dc3.zip | |
(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 @@ | |||
| 53 | (tramp-remote-shell "/bin/sh") | 53 | (tramp-remote-shell "/bin/sh") |
| 54 | (tramp-remote-shell-args ("-c")) | 54 | (tramp-remote-shell-args ("-c")) |
| 55 | (tramp-connection-timeout 10))) | 55 | (tramp-connection-timeout 10))) |
| 56 | (add-to-list | ||
| 57 | 'tramp-default-host-alist | ||
| 58 | `("\\`mock\\'" nil ,(system-name))) | ||
| 59 | ;; Emacs' Makefile sets $HOME to a nonexistent value. Needed in | ||
| 60 | ;; batch mode only, therefore. | ||
| 61 | (unless (and (null noninteractive) (file-directory-p "~/")) | ||
| 62 | (setenv "HOME" temporary-file-directory)) | ||
| 56 | (format "/mock::%s" temporary-file-directory))) | 63 | (format "/mock::%s" temporary-file-directory))) |
| 57 | "Temporary directory for Tramp tests.") | 64 | "Temporary directory for Tramp tests.") |
| 58 | 65 | ||
| @@ -1313,8 +1320,8 @@ the file watch." | |||
| 1313 | ;; Cleanup. | 1320 | ;; Cleanup. |
| 1314 | (file-notify--test-cleanup))) | 1321 | (file-notify--test-cleanup))) |
| 1315 | 1322 | ||
| 1316 | (file-notify--deftest-remote file-notify-test09-watched-file-in-watched-dir | 1323 | ;(file-notify--deftest-remote file-notify-test09-watched-file-in-watched-dir |
| 1317 | "Check `file-notify-test09-watched-file-in-watched-dir' for remote files.") | 1324 | ; "Check `file-notify-test09-watched-file-in-watched-dir' for remote files.") |
| 1318 | 1325 | ||
| 1319 | (ert-deftest file-notify-test10-sufficient-resources () | 1326 | (ert-deftest file-notify-test10-sufficient-resources () |
| 1320 | "Check that file notification does not use too many resources." | 1327 | "Check that file notification does not use too many resources." |