1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00

* automated/tramp-tests.el (tramp--test-check-files): Remove traces.

This commit is contained in:
Michael Albinus 2014-04-22 12:52:08 +02:00
parent 14828a9567
commit d5ff4ded7a
2 changed files with 3 additions and 4 deletions

View File

@ -1,7 +1,7 @@
2014-04-22 Michael Albinus <michael.albinus@gmx.de>
* automated/tramp-tests.el (tramp-test30-special-characters):
Remove test for backslash.
* automated/tramp-tests.el (tramp--test-check-files): Remove traces.
(tramp-test30-special-characters): Remove test for backslash.
2014-04-20 Michael Albinus <michael.albinus@gmx.de>

View File

@ -1426,7 +1426,6 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
(defun tramp--test-check-files (&rest files)
"Runs a simple but comprehensive test over every file in FILES."
(tramp--instrument-test-case 10
(let ((tmp-name1 (tramp--test-make-temp-name))
(tmp-name2 (tramp--test-make-temp-name 'local)))
(unwind-protect
@ -1457,7 +1456,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
tmp-name2 nil directory-files-no-dot-files-regexp)
(sort files 'string-lessp))))
(ignore-errors (delete-directory tmp-name1 'recursive))
(ignore-errors (delete-directory tmp-name2 'recursive))))))
(ignore-errors (delete-directory tmp-name2 'recursive)))))
;; This test is inspired by Bug#17238.
(ert-deftest tramp-test30-special-characters ()