From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 1 Jun 2014 16:16:26 +0000 (+0200)
Subject: * tramp-tests.el (tramp-test29-vc-registered):
X-Git-Tag: emacs-25.0.90~2612^2~709^2~825
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=30491d4964c17d1448a10bec0563ad321fd3e9e9;p=emacs.git

* tramp-tests.el (tramp-test29-vc-registered):
Add more instrumentation code.
---

diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el
index ef229710cdf..1ab3e1a6524 100644
--- a/test/automated/tramp-tests.el
+++ b/test/automated/tramp-tests.el
@@ -1430,7 +1430,12 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
 		       (list (file-name-nondirectory tmp-name2)))))
 	  (should (vc-registered tmp-name2)))
 
-	(ignore-errors (delete-directory tmp-name1 'recursive))))))
+      (with-parsed-tramp-file-name tramp-test-temporary-file-directory nil
+	(with-current-buffer (tramp-get-connection-buffer v)
+	  (message "%s" (buffer-string)))
+	(with-current-buffer (tramp-get-debug-buffer v)
+	  (message "%s" (buffer-string))))
+      (ignore-errors (delete-directory tmp-name1 'recursive))))))
 
 (defun tramp--test-check-files (&rest files)
   "Runs a simple but comprehensive test over every file in FILES."