From: Michael Albinus <michael.albinus@gmx.de>
Date: Thu, 17 Aug 2017 09:35:41 +0000 (+0200)
Subject: Set `default-directory' for watchdog in tramp-test.el
X-Git-Tag: emacs-26.0.90~439
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ddda5ae547d4c814482984cad3d350f65db082e3;p=emacs.git

Set `default-directory' for watchdog in tramp-test.el

* test/lisp/net/tramp-tests.el (tramp-test36-asynchronous-requests):
Set `default-directory' for watchdog.
---

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."
   (with-timeout (300 (tramp--test-timeout-handler))
     (define-key special-event-map [sigusr1] 'tramp--test-timeout-handler)
     (tramp--test-instrument-test-case (if (getenv "EMACS_HYDRA_CI") 10 0)
-    (let* ((watchdog
+    (let* (;; For the watchdog.
+	   (default-directory (expand-file-name temporary-file-directory))
+	   (watchdog
             (start-process
              "*watchdog*" nil shell-file-name shell-command-switch
              (format "sleep 300; kill -USR1 %d" (emacs-pid))))