[Emacs-diffs] master a568d0a 1/2: Reenable lost Tramp test case

[Michael Albinus]

branch: master
commit a568d0a7d4b62d0b92ecd6450bef1b9a5ac8ae9a
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Reenable lost Tramp test case
    
    * test/lisp/net/tramp-tests.el (tramp-test24-file-name-completion):
    Reenable lost test case.
---
 test/lisp/net/tramp-tests.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 6965b49..45b4ff2 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -1529,7 +1529,14 @@ This tests also `make-symbolic-link', `file-truename' 
and `add-name-to-file'."
                   (member
                    (format "%s:" method)
                    (file-name-all-completions (substring method 0 1) "/"))))
-                (unless (or (zerop (length method)) (zerop (length host)))
+               (unless (zerop (length host))
+                 (let ((tramp-default-method (or method tramp-default-method)))
+                   (should
+                    (member
+                     (format "-:%s:" host)
+                     (file-name-all-completions
+                      (format "-:%s" (substring host 0 1)) "/")))))
+               (unless (or (zerop (length method)) (zerop (length host)))
                  (should
                   (member
                    (format "%s:%s:" method host)