From 608b8113cbfb2f24fd806b63306333db7154eb61 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sun, 23 Aug 2020 13:19:02 +0200 Subject: [PATCH] ; * 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 05196e7e4a6..561dd268f84 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) -- 2.39.2