master 67620c2a13: ; Instrument filenotify-tests

[Michael Albinus]

branch: master
commit 67620c2a13b7ec8e16b5649c3f989b903692268b
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    ; Instrument filenotify-tests
---
 test/lisp/filenotify-tests.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el
index bdf0da7a73..cde93e6ed6 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))