procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix Tramp tests

Browse source 
* test/lisp/net/tramp-tests.el (tramp-test26-file-name-completion):
Fix test.
(tramp-test45-asynchronous-requests): Mark it :unstable.
This commit is contained in:
Michael Albinus 2023-03-14 11:39:16 +01:00
parent 54ef338ba3
commit 401ce12d62
1 changed files with 11 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
test/lisp/net/tramp-tests.el
View file

@ -4592,9 +4592,11 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
(should-not (file-name-completion "a" tmp-name))
;; `file-name-completion' should not err out if
;; directory does not exist. (Bug#61890)
;; Ange-FTP does not support this.
(unless (tramp--test-ange-ftp-p)
(should-not
(file-name-completion
"a" (tramp-compat-file-name-concat tmp-name "fuzz")))
"a" (tramp-compat-file-name-concat tmp-name "fuzz"))))
;; Ange-FTP does not support predicates.
(unless (tramp--test-ange-ftp-p)
(should
@ -7387,10 +7389,12 @@ This is needed in timer functions as well as process filters and sentinels."
"Check parallel asynchronous requests.
Such requests could arrive from timers, process filters and
process sentinels. They shall not disturb each other."
:tags (append '(:expensive-test :tramp-asynchronous-processes)
(and (or (getenv "EMACS_HYDRA_CI")
(getenv "EMACS_EMBA_CI"))
'(:unstable)))
;; :tags (append '(:expensive-test :tramp-asynchronous-processes)
;; (and (or (getenv "EMACS_HYDRA_CI")
;; (getenv "EMACS_EMBA_CI"))
;; '(:unstable)))
;; It doesn't work sufficiently.
:tags '(:expensive-test :tramp-asynchronous-processes :unstable)
(skip-unless (tramp--test-enabled))
(skip-unless (tramp--test-supports-processes-p))
(skip-unless (not (tramp--test-container-p)))