diff options
| -rw-r--r-- | test/automated/tramp-tests.el | 7 |
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." |