Commit ad995506 authored by Michael Albinus's avatar Michael Albinus

Make tramp-test42-auto-load more robust

* test/lisp/net/tramp-tests.el (tramp-test42-auto-load):
Make it more robust.  Don't skip.
parent af0ce33d
...@@ -4613,15 +4613,13 @@ process sentinels. They shall not disturb each other." ...@@ -4613,15 +4613,13 @@ process sentinels. They shall not disturb each other."
(ignore-errors (cancel-timer timer)) (ignore-errors (cancel-timer timer))
(ignore-errors (delete-directory tmp-name 'recursive)))))) (ignore-errors (delete-directory tmp-name 'recursive))))))
;; This test is inspired by Bug#29163.
(ert-deftest tramp-test42-auto-load () (ert-deftest tramp-test42-auto-load ()
"Check that Tramp autoloads properly." "Check that Tramp autoloads properly."
(skip-unless (tramp--test-enabled))
(skip-unless (not (tramp--test-mock-p)))
(let ((default-directory (expand-file-name temporary-file-directory)) (let ((default-directory (expand-file-name temporary-file-directory))
(code (code
(format (format
"(message \"Tramp loaded: %%s\" (consp (file-attributes %S)))" "(message \"Tramp loaded: %%s\" (and (file-remote-p %S) t))"
tramp-test-temporary-file-directory))) tramp-test-temporary-file-directory)))
(should (should
(string-match (string-match
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment