From a8f2d97b12bf2c5cc8ef1a1e7e4eb2ed05cf3af8 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 26 Jul 2018 16:12:15 +0200 Subject: [PATCH] ; More instrumentation for shadowfile-tests.el --- test/lisp/shadowfile-tests.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/test/lisp/shadowfile-tests.el b/test/lisp/shadowfile-tests.el index 83e9a36af31..910845ad40a 100644 --- a/test/lisp/shadowfile-tests.el +++ b/test/lisp/shadowfile-tests.el @@ -743,6 +743,8 @@ guaranteed by the originator of a cluster definition." ;; Save file from "cluster2" definition. (with-temp-buffer (message "Point 4.1") + (message "%s" file) + (message "%s" (shadow-site-primary cluster2)) (setq buffer-file-name (concat (shadow-site-primary cluster2) file)) (message "Point 4.2") (insert "foo")