[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 4c7f329: ; Remove instrumentation of tramp-tests.el
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 4c7f329: ; Remove instrumentation of tramp-tests.el |
Date: |
Wed, 11 May 2016 14:45:57 +0000 (UTC) |
branch: master
commit 4c7f32977c4fad322a80e33a2e397aa8496ed9ba
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
; Remove instrumentation of tramp-tests.el
---
test/lisp/net/tramp-tests.el | 12 +-----------
1 file changed, 1 insertion(+), 11 deletions(-)
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 2238da5..6553421 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -639,34 +639,24 @@ This checks also `file-name-as-directory',
`file-name-directory',
(should-not
(unhandled-file-name-directory "/method:host:/path/to/file"))
- (unwind-protect
;; Bug#10085.
(dolist (n-e '(nil t))
;; We must clear `tramp-default-method'. On hydra, it is "ftp",
;; which ruins the tests.
(let ((non-essential n-e)
tramp-default-method)
- (when (getenv "NIX_STORE")
- (dolist (elt (all-completions "tramp-" obarray 'functionp))
- (trace-function-background (intern elt))))
(dolist (file
`(,(file-remote-p tramp-test-temporary-file-directory 'method)
,(file-remote-p tramp-test-temporary-file-directory 'host)))
(unless (zerop (length file))
(setq file (format "/%s:" file))
(should (string-equal (directory-file-name file) file))
- (when (getenv "NIX_STORE")
- (message "file %s non-essential %s tramp-completion-mode-p %s"
- file non-essential (tramp-completion-mode-p)))
(should
(string-equal
(file-name-as-directory file)
(if (tramp-completion-mode-p) file (concat file "./"))))
(should (string-equal (file-name-directory file) file))
- (should (string-equal (file-name-nondirectory file) ""))))))
- (when (getenv "NIX_STORE")
- (untrace-all)
- (message "%s" (with-current-buffer trace-buffer (buffer-string))))))
+ (should (string-equal (file-name-nondirectory file) "")))))))
(ert-deftest tramp-test07-file-exists-p ()
"Check `file-exist-p', `write-region' and `delete-file'."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 4c7f329: ; Remove instrumentation of tramp-tests.el,
Michael Albinus <=