aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorMichael Albinus <[email protected]>2014-06-01 11:33:57 +0200
committerMichael Albinus <[email protected]>2014-06-01 11:33:57 +0200
commit3340452bdc6a1f866e78f99a3b556f1583e20354 (patch)
treec6d942dc072ffd7db2f14e5edc64cf5e6aa9b732 /test
parent7a458be33cd6120b9dc9889a6d38b1ff6a6e412d (diff)
* tramp-tests.el (tramp-test29-vc-registered):
Instrument failed test case.
Diffstat (limited to 'test')
-rw-r--r--test/automated/tramp-tests.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el
index 2640ee9cef..ef229710cd 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."