master 608b811 1/2: ; * test/lisp/net/tramp-tests.el (tramp-test28-process-file): Instrument test.

[Michael Albinus]

branch: master
commit 608b8113cbfb2f24fd806b63306333db7154eb61
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    ; * test/lisp/net/tramp-tests.el (tramp-test28-process-file): Instrument 
test.
---
 test/lisp/net/tramp-tests.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 05196e7..561dd26 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -4229,6 +4229,7 @@ This tests also `make-symbolic-link', `file-truename' and 
`add-name-to-file'."
   (skip-unless (or (tramp--test-adb-p) (tramp--test-sh-p)))
   (skip-unless (not (tramp--test-crypt-p)))
 
+  (tramp--test-instrument-test-case 10
   (dolist (quoted (if (tramp--test-expensive-test) '(nil t) '(nil)))
     (let* ((tmp-name (tramp--test-make-temp-name nil quoted))
           (fnnd (file-name-nondirectory tmp-name))
@@ -4289,7 +4290,7 @@ This tests also `make-symbolic-link', `file-truename' and 
`add-name-to-file'."
              (should-not (get-buffer-window (current-buffer) t))))
 
        ;; Cleanup.
-       (ignore-errors (delete-file tmp-name))))))
+       (ignore-errors (delete-file tmp-name)))))))
 
 ;; Must be a command, because used as `sigusr' handler.
 (defun tramp--test-timeout-handler (&rest _ignore)