diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2014-02-28 09:47:43 +0100 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2014-02-28 09:47:43 +0100 |
commit | 5b5774e5d5f845de8493ade93f5eed66934d779c (patch) | |
tree | 9ee5eab1b647f69f797c874e2095aa87928c6316 /test/automated/tramp-tests.el | |
parent | 245aa73efeb4c2ef67c531033d67402c8204dda4 (diff) |
* automated/tramp-tests.el (tramp--test-enabled)
(tramp-test15-copy-directory): No special handling of tramp-adb.el
anymore. It's fixed in that package.
Diffstat (limited to 'test/automated/tramp-tests.el')
-rw-r--r-- | test/automated/tramp-tests.el | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el index 706e2e0e25..25cd0c6a96 100644 --- a/test/automated/tramp-tests.el +++ b/test/automated/tramp-tests.el @@ -82,10 +82,7 @@ being the result.") (file-directory-p tramp-test-temporary-file-directory) (file-writable-p tramp-test-temporary-file-directory)))))) - (when (and (cdr tramp--test-enabled-checked) - (not (eq (tramp-find-foreign-file-name-handler - tramp-test-temporary-file-directory) - 'tramp-adb-file-name-handler))) + (when (cdr tramp--test-enabled-checked) ;; Cleanup connection. We don't cleanup for adb, because it ;; doesn't behave well when is disconnect several times. (tramp-cleanup-connection @@ -751,14 +748,11 @@ This tests also `file-directory-p' and `file-accessible-directory-p'." (write-region "foo" nil tmp-name4) (should (file-directory-p tmp-name1)) (should (file-exists-p tmp-name4)) - ;; We do not care, whether file permissions and time stamps - ;; are correct. Sometimes, it is not possible to manage - ;; them, for example in tramp-adb.el. - (ignore-errors (copy-directory tmp-name1 tmp-name2)) + (copy-directory tmp-name1 tmp-name2) (should (file-directory-p tmp-name2)) (should (file-exists-p tmp-name5)) ;; Target directory does exist already. - (ignore-errors (copy-directory tmp-name1 tmp-name2)) + (copy-directory tmp-name1 tmp-name2) (should (file-directory-p tmp-name3)) (should (file-exists-p tmp-name6))) (ignore-errors |