[Emacs-diffs] trunk r116604: * automated/tramp-tests.el (tramp--test-enabled)

[Michael Albinus]

------------------------------------------------------------
revno: 116604
revision-id: address@hidden
parent: address@hidden
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Fri 2014-02-28 09:47:43 +0100
message:
  * 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.
modified:
  test/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-8588
  test/automated/tramp-tests.el  tramptests.el-20131105142319-d9zp3oprkpxj5v1e-1

=== modified file 'test/ChangeLog'
--- a/test/ChangeLog    2014-02-27 12:07:10 +0000
+++ b/test/ChangeLog    2014-02-28 08:47:43 +0000
@@ -1,3 +1,9 @@
+2014-02-28  Michael Albinus  <address@hidden>
+
+       * 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.
+
 2014-02-27  Michael Albinus  <address@hidden>
 
        * automated/tramp-tests.el (tramp--test-enabled): Move connection

=== modified file 'test/automated/tramp-tests.el'
--- a/test/automated/tramp-tests.el     2014-02-27 12:07:10 +0000
+++ b/test/automated/tramp-tests.el     2014-02-28 08:47:43 +0000
@@ -82,10 +82,7 @@
           (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 @@
          (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