diff options
| author | Paul Eggert | 2017-12-02 21:38:05 -0800 |
|---|---|---|
| committer | Paul Eggert | 2017-12-02 21:38:05 -0800 |
| commit | f1204e1dda84a65d7906949247076c6ba4d4ba40 (patch) | |
| tree | 634603e56c040597c1f11fbe39fda9d6a4ba14a4 /test/lisp | |
| parent | bc092fcaea7268f2339f0e92720a37e62cdca5b2 (diff) | |
| parent | 8c8b6732882248df4ca3b687e0a4b4e5e4ab3777 (diff) | |
| download | emacs-f1204e1dda84a65d7906949247076c6ba4d4ba40.tar.gz emacs-f1204e1dda84a65d7906949247076c6ba4d4ba40.zip | |
Merge from origin/emacs-26
8c8b673288 Fix backing up remote files in local directories on MS-Win...
8eb6870be6 Fix vertical cursor motion in pixel-scroll.el
625e84f156 Fix typos in doc strings of message.el
9292276a44 Fix a typo in the Emacs manual
42509c0649 Improve the documentation of 'table-insert-sequence'
93dc7ae4a4 Port better to QNX
ad99550610 Make tramp-test42-auto-load more robust
af0ce33d08 ; * lisp/composite.el (find-composition): Fix a typo in la...
bdbcdbac43 Avoid assertions in find-composition
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 044ab9329ff..5699ab4b237 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -4624,15 +4624,13 @@ process sentinels. They shall not disturb each other." | |||
| 4624 | (ignore-errors (cancel-timer timer)) | 4624 | (ignore-errors (cancel-timer timer)) |
| 4625 | (ignore-errors (delete-directory tmp-name 'recursive))))))) | 4625 | (ignore-errors (delete-directory tmp-name 'recursive))))))) |
| 4626 | 4626 | ||
| 4627 | ;; This test is inspired by Bug#29163. | ||
| 4627 | (ert-deftest tramp-test42-auto-load () | 4628 | (ert-deftest tramp-test42-auto-load () |
| 4628 | "Check that Tramp autoloads properly." | 4629 | "Check that Tramp autoloads properly." |
| 4629 | (skip-unless (tramp--test-enabled)) | ||
| 4630 | (skip-unless (not (tramp--test-mock-p))) | ||
| 4631 | |||
| 4632 | (let ((default-directory (expand-file-name temporary-file-directory)) | 4630 | (let ((default-directory (expand-file-name temporary-file-directory)) |
| 4633 | (code | 4631 | (code |
| 4634 | (format | 4632 | (format |
| 4635 | "(message \"Tramp loaded: %%s\" (consp (file-attributes %S)))" | 4633 | "(message \"Tramp loaded: %%s\" (and (file-remote-p %S) t))" |
| 4636 | tramp-test-temporary-file-directory))) | 4634 | tramp-test-temporary-file-directory))) |
| 4637 | (should | 4635 | (should |
| 4638 | (string-match | 4636 | (string-match |