aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2014-06-01 18:16:26 +0200
committerMichael Albinus2014-06-01 18:16:26 +0200
commit30491d4964c17d1448a10bec0563ad321fd3e9e9 (patch)
tree3de7a72c00ff5f0ec29b84fbd2b623dea50353c8
parentbe04283a7f74d6a5159a312bacd08fb31beee054 (diff)
downloademacs-30491d4964c17d1448a10bec0563ad321fd3e9e9.tar.gz
emacs-30491d4964c17d1448a10bec0563ad321fd3e9e9.zip
* tramp-tests.el (tramp-test29-vc-registered):
Add more instrumentation code.
-rw-r--r--test/automated/tramp-tests.el7
1 files changed, 6 insertions, 1 deletions
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'."
1430 (list (file-name-nondirectory tmp-name2))))) 1430 (list (file-name-nondirectory tmp-name2)))))
1431 (should (vc-registered tmp-name2))) 1431 (should (vc-registered tmp-name2)))
1432 1432
1433 (ignore-errors (delete-directory tmp-name1 'recursive)))))) 1433 (with-parsed-tramp-file-name tramp-test-temporary-file-directory nil
1434 (with-current-buffer (tramp-get-connection-buffer v)
1435 (message "%s" (buffer-string)))
1436 (with-current-buffer (tramp-get-debug-buffer v)
1437 (message "%s" (buffer-string))))
1438 (ignore-errors (delete-directory tmp-name1 'recursive))))))
1434 1439
1435(defun tramp--test-check-files (&rest files) 1440(defun tramp--test-check-files (&rest files)
1436 "Runs a simple but comprehensive test over every file in FILES." 1441 "Runs a simple but comprehensive test over every file in FILES."