; Add traces to shadowfile-tests.el

diff --git a/test/lisp/shadowfile-tests.el b/test/lisp/shadowfile-tests.el
index cee51b20d8edb98c714aa1295648079f2a00bac5..c60767c27c5d2627c822bf00336d5c91c1158c25 100644 (file)
--- a/test/lisp/shadowfile-tests.el
+++ b/test/lisp/shadowfile-tests.el
@@ -63,6 +63,9 @@
       (format "/mock::%s" temporary-file-directory)))
   "Temporary directory for Tramp tests.")
 
+(message
+ "%s %s" temporary-file-directory shadow-test-remote-temporary-file-directory)
+
 (setq password-cache-expiry nil
       shadow-debug (getenv "EMACS_HYDRA_CI")
       tramp-verbose 0
@@ -73,6 +76,11 @@
       (ignore-errors
         (file-truename shadow-test-remote-temporary-file-directory)))
 
+(when shadow-debug
+  (message
+   "%s %s"
+   temporary-file-directory shadow-test-remote-temporary-file-directory))
+
 ;; This should happen on hydra only.
 (when (getenv "EMACS_HYDRA_CI")
   (add-to-list 'tramp-remote-path 'tramp-own-remote-path))