Adapt Tramp test

* test/lisp/net/tramp-tests.el (tramp-test33-environment-variables):
Adapt test.

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 51980e335e777b6781cb908fddb0fab683618dde..16afc0f477a618140f18c29ee1310cf7673ca21e 100644 (file)
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -6073,7 +6073,9 @@ INPUT, if non-nil, is a string sent to the process."
        ;; Unset the variable.
        (let ((tramp-remote-process-environment
               (cons (concat envvar "=foo") tramp-remote-process-environment)))
-         ;; Set the initial value, we want to unset below.
+         ;; Refill the cache; we don't want to run into timeouts.
+         (file-truename default-directory)
+         ;; Check the initial value, we want to unset below.
          (should
           (string-match-p
            "foo"