diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2022-09-18 10:51:33 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2022-09-18 10:51:33 +0200 |
| commit | 67620c2a13b7ec8e16b5649c3f989b903692268b (patch) | |
| tree | a545d1134ee71a234aa0646e5ad3ac4a4bf14e5a /test/lisp/filenotify-tests.el | |
| parent | 25587ada2c094e5435a7a39bf99e97730cc7ecd0 (diff) | |
| download | emacs-67620c2a13b7ec8e16b5649c3f989b903692268b.tar.gz | |
; Instrument filenotify-tests
Diffstat (limited to 'test/lisp/filenotify-tests.el')
| -rw-r--r-- | test/lisp/filenotify-tests.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el index bdf0da7a736..cde93e6ed60 100644 --- a/test/lisp/filenotify-tests.el +++ b/test/lisp/filenotify-tests.el @@ -137,6 +137,11 @@ Return nil when any other file notification watch is still active." (defun file-notify--test-cleanup () "Cleanup after a test." + (when (getenv "EMACS_EMBA_CI") + (dolist (buf (tramp-list-tramp-buffers)) + (message ";; %s\n%s" buf (tramp-get-buffer-string buf)) + (kill-buffer buf))) + (file-notify-rm-all-watches) (ignore-errors @@ -173,7 +178,8 @@ Return nil when any other file notification watch is still active." (setq file-notify-debug nil password-cache-expiry nil - tramp-verbose 0 + tramp-verbose (when (getenv "EMACS_EMBA_CI") 10 0) + ;; When the remote user id is 0, Tramp refuses unsafe temporary files. tramp-allow-unsafe-temporary-files (or tramp-allow-unsafe-temporary-files noninteractive)) |