From a568d0a7d4b62d0b92ecd6450bef1b9a5ac8ae9a Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Tue, 14 Mar 2017 15:52:16 +0100 Subject: [PATCH] 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 6965b49a8e1..45b4ff2f5ab 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) -- 2.39.5