From a67aaeb3a97e733628f3b97a71b2297eb958c8ed Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sun, 1 Jun 2014 12:49:45 +0200 Subject: [PATCH] * automated/tramp-tests.el (tramp-test29-vc-registered): Instrument failed test case. --- test/ChangeLog | 5 +++++ test/automated/tramp-tests.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/test/ChangeLog b/test/ChangeLog index becf23c58c2..545e77adee9 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,3 +1,8 @@ +2014-06-01 Michael Albinus + + * automated/tramp-tests.el (tramp-test29-vc-registered): + Instrument failed test case. + 2014-05-29 Stefan Monnier * automated/ruby-mode-tests.el (ruby-assert-face): Use font-lock-ensure. diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el index 2640ee9cef5..ef229710cdf 100644 --- a/test/automated/tramp-tests.el +++ b/test/automated/tramp-tests.el @@ -1394,6 +1394,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." (tramp-find-foreign-file-name-handler tramp-test-temporary-file-directory) 'tramp-sh-file-name-handler)) + (tramp--instrument-test-case 10 (let* ((default-directory tramp-test-temporary-file-directory) (tmp-name1 (tramp--test-make-temp-name)) (tmp-name2 (expand-file-name "foo" tmp-name1)) @@ -1429,7 +1430,7 @@ 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))))) + (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." -- 2.39.2