; Instrument tramp-tests.el for hydra.

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 58860c7161a6db1faa2c9c9213219210634bf260..9278c2254b863fd7ee9d3031c59ea97d1f8f09d2 100644 (file)
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -3806,6 +3806,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
   (skip-unless (tramp--test-enabled))
   (skip-unless (tramp--test-sh-p))
 
+  (tramp--test-instrument-test-case 0
   (dolist (quoted (if (tramp--test-expensive-test) '(nil t) '(nil)))
     (let ((default-directory tramp-test-temporary-file-directory)
          (tmp-name (tramp--test-make-temp-name nil quoted))
@@ -3863,7 +3864,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
            (should (string-equal (buffer-string) "foo")))
 
        ;; Cleanup.
-       (ignore-errors (delete-process proc))))))
+       (ignore-errors (delete-process proc)))))))
 
 (ert-deftest tramp-test30-make-process ()
   "Check `make-process'."