; Instrument tramp-test46-read-password

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index a5058f92ef04d8ac3a58dddd85eab5c72695b1c9..b27b735eb570dfe7650b302801f3adbb56d1b857 100644 (file)
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -7308,7 +7308,8 @@ process sentinels.  They shall not disturb each other."
   (skip-unless (tramp--test-enabled))
   (skip-unless (tramp--test-mock-p))
 
-  (let ((pass "aaaa")
+  (tramp--test-instrument-test-case 10
+  (let ((pass "secret")
        (mock-entry (copy-sequence (assoc "mock" tramp-methods)))
        mocked-input tramp-methods)
     ;; We must mock `read-string', in order to avoid interactive
@@ -7354,7 +7355,7 @@ process sentinels.  They shall not disturb each other."
                 "machine %s port mock password %s"
                 (file-remote-p tramp-test-temporary-file-directory 'host) pass)
          (let ((auth-sources `(,netrc-file)))
-           (should (file-exists-p tramp-test-temporary-file-directory)))))))))
+           (should (file-exists-p tramp-test-temporary-file-directory))))))))))
 
 ;; This test is inspired by Bug#29163.
 (ert-deftest tramp-test47-auto-load ()