Adapt Tramp new test macros

* test/lisp/net/tramp-tests.el (tramp--test-deftest-with-stat)
(tramp--test-deftest-with-perl, tramp--test-deftest-with-ls):
Skip for all methods but those from tramp-sh.el.

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 2e2f9333ba919b025dce77e7e725c9c4e46f6dd2..551a70a21ad597b07d75bde74c260af7cc0336a3 100644 (file)
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -3569,6 +3569,7 @@ This tests also `access-file', `file-readable-p',
      ;;             "\nUse the \"stat\" command.")
      :tags '(:expensive-test)
      (skip-unless (tramp--test-enabled))
+     (skip-unless (tramp--test-sh-p))
      (skip-unless (tramp-get-remote-stat tramp-test-vec))
      (let ((default-directory ert-remote-temporary-file-directory)
           (ert-test (ert-get-test ',test))
@@ -3587,6 +3588,7 @@ This tests also `access-file', `file-readable-p',
      ;;             "\nUse the \"perl\" command.")
      :tags '(:expensive-test)
      (skip-unless (tramp--test-enabled))
+     (skip-unless (tramp--test-sh-p))
      (skip-unless (tramp-get-remote-perl tramp-test-vec))
      (let ((default-directory ert-remote-temporary-file-directory)
           (ert-test (ert-get-test ',test))
@@ -3608,6 +3610,7 @@ This tests also `access-file', `file-readable-p',
      ;;             "\nUse the \"ls\" command.")
      :tags '(:expensive-test)
      (skip-unless (tramp--test-enabled))
+     (skip-unless (tramp--test-sh-p))
      (let ((default-directory ert-remote-temporary-file-directory)
           (ert-test (ert-get-test ',test))
           (tramp-connection-properties