diff --git a/test/tramp-tests.el b/test/tramp-tests.el index ee9c09df..c2ff3388 100644 --- a/test/tramp-tests.el +++ b/test/tramp-tests.el @@ -7181,6 +7181,7 @@ This requires restrictions of file name syntax." (defun tramp--test-check-files (&rest files) "Run a simple but comprehensive test over every file in FILES." + (tramp--test-instrument-test-case 10 (dolist (quoted (if (tramp--test-expensive-test-p) '(nil t) '(nil))) ;; We must use `file-truename' for the temporary directory, ;; because it could be located on a symlinked directory. This @@ -7383,7 +7384,7 @@ This requires restrictions of file name syntax." ;; Cleanup. (ignore-errors (kill-buffer buffer)) (ignore-errors (delete-directory tmp-name1 'recursive)) - (ignore-errors (delete-directory tmp-name2 'recursive)))))) + (ignore-errors (delete-directory tmp-name2 'recursive))))))) ;; These tests are inspired by Bug#17238. (ert-deftest tramp-test41-special-characters ()