aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2014-04-19 23:05:30 +0200
committerMichael Albinus2014-04-19 23:05:30 +0200
commitca2e9fb3064d0891c5143ba52c220f2c99be7273 (patch)
treefed6d897e37228976424317e1b821d9ae9e05139
parentd7b659bb0615d326f79b2ea96b2acd90b816c3c0 (diff)
downloademacs-ca2e9fb3064d0891c5143ba52c220f2c99be7273.tar.gz
emacs-ca2e9fb3064d0891c5143ba52c220f2c99be7273.zip
Instrument `tramp--test-check-files' in order to get traces on hydra.
-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 607718412fd..2572f9c82e4 100644
--- a/test/automated/tramp-tests.el
+++ b/test/automated/tramp-tests.el
@@ -1418,6 +1418,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
1418 1418
1419(defun tramp--test-check-files (&rest files) 1419(defun tramp--test-check-files (&rest files)
1420 "Runs a simple but comprehensive test over every file in FILES." 1420 "Runs a simple but comprehensive test over every file in FILES."
1421 (tramp--instrument-test-case 10
1421 (let ((tmp-name1 (tramp--test-make-temp-name)) 1422 (let ((tmp-name1 (tramp--test-make-temp-name))
1422 (tmp-name2 (tramp--test-make-temp-name 'local))) 1423 (tmp-name2 (tramp--test-make-temp-name 'local)))
1423 (unwind-protect 1424 (unwind-protect
@@ -1448,7 +1449,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
1448 tmp-name2 nil directory-files-no-dot-files-regexp) 1449 tmp-name2 nil directory-files-no-dot-files-regexp)
1449 (sort (copy-sequence files) 'string-lessp)))) 1450 (sort (copy-sequence files) 'string-lessp))))
1450 (ignore-errors (delete-directory tmp-name1 'recursive)) 1451 (ignore-errors (delete-directory tmp-name1 'recursive))
1451 (ignore-errors (delete-directory tmp-name2 'recursive))))) 1452 (ignore-errors (delete-directory tmp-name2 'recursive))))))
1452 1453
1453;; This test is inspired by Bug#17238. 1454;; This test is inspired by Bug#17238.
1454(ert-deftest tramp-test30-special-characters () 1455(ert-deftest tramp-test30-special-characters ()