diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2018-03-23 17:39:29 +0100 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2018-03-23 17:39:29 +0100 |
| commit | d0881374734310eb77526823c0acad1fe556f41b (patch) | |
| tree | db37a866fcc889fce6148b136bcb601b03bd1dbf | |
| parent | 02f4802623db6ab74e0809841007fa1e41207b44 (diff) | |
| download | emacs-d0881374734310eb77526823c0acad1fe556f41b.tar.gz | |
Instrument tramp-test39-utf8
* test/lisp/net/tramp-tests.el (tramp--test-expensive-test):
Add the test name to the template.
(tramp-test39-utf8): Instrument test.
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 70c9002ab3f..8e21f5220fc 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -133,7 +133,8 @@ being the result.") "Whether expensive tests are run." (ert-select-tests (ert--stats-selector ert--current-run-stats) - (list (make-ert-test :body nil :tags '(:expensive-test))))) + (list (make-ert-test :name (ert-test-name (ert-running-test)) + :body nil :tags '(:expensive-test))))) (defun tramp--test-make-temp-name (&optional local quoted) "Return a temporary file name for test. @@ -4660,7 +4661,8 @@ Use the `ls' command." (skip-unless (not (tramp--test-windows-nt-and-batch))) (skip-unless (not (tramp--test-windows-nt-and-pscp-psftp-p))) - (tramp--test-utf8)) + (tramp--test-instrument-test-case 10 + (tramp--test-utf8))) (ert-deftest tramp-test39-utf8-with-stat () "Check UTF8 encoding in file names and file contents. |