diff options
| author | Michael Albinus | 2017-08-17 11:35:41 +0200 |
|---|---|---|
| committer | Michael Albinus | 2017-08-17 11:35:41 +0200 |
| commit | ddda5ae547d4c814482984cad3d350f65db082e3 (patch) | |
| tree | 9c2c95287fdbb9bc601f83999208c568841f2be4 | |
| parent | 10a5a52f1d3d58297d926dc0b1f20bc0e423e408 (diff) | |
| download | emacs-ddda5ae547d4c814482984cad3d350f65db082e3.tar.gz emacs-ddda5ae547d4c814482984cad3d350f65db082e3.zip | |
Set `default-directory' for watchdog in tramp-test.el
* test/lisp/net/tramp-tests.el (tramp-test36-asynchronous-requests):
Set `default-directory' for watchdog.
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 45cf95fcfe0..9d2598ac03e 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -3821,7 +3821,9 @@ process sentinels. They shall not disturb each other." | |||
| 3821 | (with-timeout (300 (tramp--test-timeout-handler)) | 3821 | (with-timeout (300 (tramp--test-timeout-handler)) |
| 3822 | (define-key special-event-map [sigusr1] 'tramp--test-timeout-handler) | 3822 | (define-key special-event-map [sigusr1] 'tramp--test-timeout-handler) |
| 3823 | (tramp--test-instrument-test-case (if (getenv "EMACS_HYDRA_CI") 10 0) | 3823 | (tramp--test-instrument-test-case (if (getenv "EMACS_HYDRA_CI") 10 0) |
| 3824 | (let* ((watchdog | 3824 | (let* (;; For the watchdog. |
| 3825 | (default-directory (expand-file-name temporary-file-directory)) | ||
| 3826 | (watchdog | ||
| 3825 | (start-process | 3827 | (start-process |
| 3826 | "*watchdog*" nil shell-file-name shell-command-switch | 3828 | "*watchdog*" nil shell-file-name shell-command-switch |
| 3827 | (format "sleep 300; kill -USR1 %d" (emacs-pid)))) | 3829 | (format "sleep 300; kill -USR1 %d" (emacs-pid)))) |