diff options
| author | Eli Zaretskii | 2025-05-10 07:40:30 -0400 |
|---|---|---|
| committer | Eli Zaretskii | 2025-05-10 07:40:30 -0400 |
| commit | 1410bfb7ca5a3497fbbf36a9d31f9a1dce8fd63a (patch) | |
| tree | 37bfcee9885bb0b54294235080d4d2e576981ec9 /test | |
| parent | 7265be09cebc9ee752b688b7a85fb1ac18b45ef5 (diff) | |
| parent | 0d493864cee2ea1d7661d51b973db58667b6b65b (diff) | |
| download | emacs-1410bfb7ca5a3497fbbf36a9d31f9a1dce8fd63a.tar.gz emacs-1410bfb7ca5a3497fbbf36a9d31f9a1dce8fd63a.zip | |
Merge from origin/emacs-30
0d493864cee Fix indentation of XML comments
1a2c29b5317 Improve Tramp's make-process handling for Solaris
a7dffc2ea38 Document 'time-stamp-time-zone' in Emacs Manual
0b4eb525b69 Make treesit--simple-indent-eval more permissive (bug#78065)
ed7b55f6bf1 Adapt Tramp tests
b172a1478c1 ; * doc/lispref/tips.texi (Library Headers): Fix wording ...
81629b2b2ba ; * lisp/gnus/mail-source.el (mail-sources): Fix a typo (...
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index eeb90539f61..1c11b0e285c 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -5393,6 +5393,12 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." | |||
| 5393 | (with-timeout (10 (tramp--test-timeout-handler)) | 5393 | (with-timeout (10 (tramp--test-timeout-handler)) |
| 5394 | (while (< (- (point-max) (point-min)) (length "foo")) | 5394 | (while (< (- (point-max) (point-min)) (length "foo")) |
| 5395 | (while (accept-process-output proc 0 nil t)))) | 5395 | (while (accept-process-output proc 0 nil t)))) |
| 5396 | ;; Some `cat' implementations do not support the `cat -' | ||
| 5397 | ;; call. We skip then. | ||
| 5398 | (skip-unless | ||
| 5399 | (not | ||
| 5400 | (string-match-p (rx "cat: -: input file is output file\n") | ||
| 5401 | (buffer-string)))) | ||
| 5396 | (should (string-match-p "foo" (buffer-string)))) | 5402 | (should (string-match-p "foo" (buffer-string)))) |
| 5397 | 5403 | ||
| 5398 | ;; Cleanup. | 5404 | ;; Cleanup. |
| @@ -5587,6 +5593,12 @@ If UNSTABLE is non-nil, the test is tagged as `:unstable'." | |||
| 5587 | (with-timeout (10 (tramp--test-timeout-handler)) | 5593 | (with-timeout (10 (tramp--test-timeout-handler)) |
| 5588 | (while (< (- (point-max) (point-min)) (length "foo")) | 5594 | (while (< (- (point-max) (point-min)) (length "foo")) |
| 5589 | (while (accept-process-output proc 0 nil t)))) | 5595 | (while (accept-process-output proc 0 nil t)))) |
| 5596 | ;; Some `cat' implementations do not support the `cat -' | ||
| 5597 | ;; call. We skip then. | ||
| 5598 | (skip-unless | ||
| 5599 | (not | ||
| 5600 | (string-match-p (rx "cat: -: input file is output file\n") | ||
| 5601 | (buffer-string)))) | ||
| 5590 | (should (string-match-p "foo" (buffer-string)))) | 5602 | (should (string-match-p "foo" (buffer-string)))) |
| 5591 | 5603 | ||
| 5592 | ;; Cleanup. | 5604 | ;; Cleanup. |