diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index dccef81b7b5..3eb424c62dc 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -4113,7 +4113,8 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." | |||
| 4113 | "Like `shell-command-to-string', but for asynchronous processes." | 4113 | "Like `shell-command-to-string', but for asynchronous processes." |
| 4114 | (with-temp-buffer | 4114 | (with-temp-buffer |
| 4115 | (async-shell-command command (current-buffer)) | 4115 | (async-shell-command command (current-buffer)) |
| 4116 | (with-timeout (10 (tramp--test-timeout-handler)) | 4116 | (with-timeout |
| 4117 | ((if (getenv "EMACS_EMBA_CI") 30 10) (tramp--test-timeout-handler)) | ||
| 4117 | (while (accept-process-output | 4118 | (while (accept-process-output |
| 4118 | (get-buffer-process (current-buffer)) nil nil t))) | 4119 | (get-buffer-process (current-buffer)) nil nil t))) |
| 4119 | (buffer-substring-no-properties (point-min) (point-max)))) | 4120 | (buffer-substring-no-properties (point-min) (point-max)))) |