[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 7e434ed: Adapt tramp-tests.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 7e434ed: Adapt tramp-tests.el |
Date: |
Fri, 10 Mar 2017 08:34:30 -0500 (EST) |
branch: master
commit 7e434ed2ebc4f9fddd6f7d34e7a9907729fd3bcf
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
Adapt tramp-tests.el
* test/lisp/net/tramp-tests.el (tramp-test06-directory-file-name)
(tramp-test24-file-name-completion): Call
`tramp-completion-mode-p' with argument.
---
test/lisp/net/tramp-tests.el | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 0c3068a..a854f4e 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -732,7 +732,8 @@ This checks also `file-name-as-directory',
`file-name-directory',
(should
(string-equal
(file-name-as-directory file)
- (if (tramp-completion-mode-p) file (concat file "./"))))
+ (if (tramp-completion-mode-p (tramp-dissect-file-name file))
+ file (concat file "./"))))
(should (string-equal (file-name-directory file) file))
(should (string-equal (file-name-nondirectory file) ""))))))))
@@ -1515,7 +1516,9 @@ This tests also `make-symbolic-link', `file-truename' and
`add-name-to-file'."
(progn
;; Method and host name in completion mode. This kind
;; of completion does not work on MS Windows.
- (when (and (tramp-completion-mode-p)
+ (when (and (tramp-completion-mode-p
+ (tramp-dissect-file-name
+ tramp-test-temporary-file-directory))
(not (memq system-type '(cygwin windows-nt))))
(unless (zerop (length method))
(should
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 7e434ed: Adapt tramp-tests.el,
Michael Albinus <=