diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-05-07 10:24:30 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-05-07 10:24:30 +0100 |
| commit | 92dc81f85e1b91db04487ccf1b52c0cd3328dfee (patch) | |
| tree | bc3081252c6ee13007a02e52bf63c951e486b086 /test/lisp | |
| parent | cf105f604413d270c956adf375217960e3945e2a (diff) | |
| parent | de5f59219ac02c6502907f6a24538ddabf487839 (diff) | |
| download | emacs-92dc81f85e1b91db04487ccf1b52c0cd3328dfee.tar.gz emacs-92dc81f85e1b91db04487ccf1b52c0cd3328dfee.tar.bz2 emacs-92dc81f85e1b91db04487ccf1b52c0cd3328dfee.zip | |
Merge remote-tracking branch 'savannah/master' into HEAD
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 462539a7c17..4cacfa2f712 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -4209,6 +4209,8 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." (should-not (zerop (process-file "false"))) (should-not (zerop (process-file "binary-does-not-exist"))) (should (= 42 (process-file "sh" nil nil nil "-c" "exit 42"))) + ;; Return string in case the process is interrupted. + (should (stringp (process-file "sh" nil nil nil "-c" "kill -2 $$"))) (with-temp-buffer (write-region "foo" nil tmp-name) (should (file-exists-p tmp-name)) |