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 4cacfa2f712..8c3cb8e2e8f 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -4208,7 +4208,8 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." | |||
| 4208 | (should (zerop (process-file "true"))) | 4208 | (should (zerop (process-file "true"))) |
| 4209 | (should-not (zerop (process-file "false"))) | 4209 | (should-not (zerop (process-file "false"))) |
| 4210 | (should-not (zerop (process-file "binary-does-not-exist"))) | 4210 | (should-not (zerop (process-file "binary-does-not-exist"))) |
| 4211 | (should (= 42 (process-file "sh" nil nil nil "-c" "exit 42"))) | 4211 | (should (= (if (getenv "EMACS_HYDRA_CI") 127 42) |
| 4212 | (process-file "sh" nil nil nil "-c" "exit 42"))) | ||
| 4212 | ;; Return string in case the process is interrupted. | 4213 | ;; Return string in case the process is interrupted. |
| 4213 | (should (stringp (process-file "sh" nil nil nil "-c" "kill -2 $$"))) | 4214 | (should (stringp (process-file "sh" nil nil nil "-c" "kill -2 $$"))) |
| 4214 | (with-temp-buffer | 4215 | (with-temp-buffer |