diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2016-05-09 16:53:49 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2016-05-09 16:53:49 +0200 |
| commit | 608f2bd0ac9d950a04ad73bf36d96d25b469b9be (patch) | |
| tree | b4ec597c9ad0432964e1a02d7a042072e37e134c | |
| parent | fd45b5276ba1454c8b4f06cd53367830c1389d84 (diff) | |
| download | emacs-608f2bd0ac9d950a04ad73bf36d96d25b469b9be.tar.gz | |
; Instrument tramp-tests.el
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index a85eed0302a..6bbe9691286 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -648,6 +648,9 @@ This checks also `file-name-as-directory', `file-name-directory', (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) |