From d5928dad79d58a54f179c8cd0a17189310bde101 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 3 Jan 2019 12:08:56 +0100 Subject: [PATCH] Instrument filenotify tests * .gitlab-ci.yml (test): Run only filenotify-tests. * test/lisp/filenotify-tests.el (file-notify--test-event-handler): Print test messages on EMBA. --- .gitlab-ci.yml | 2 +- test/lisp/filenotify-tests.el | 5 +++-- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/.gitlab-ci.yml b/.gitlab-ci.yml index 9d713b77218..f03270c59d8 100644 --- a/.gitlab-ci.yml +++ b/.gitlab-ci.yml @@ -41,4 +41,4 @@ test: - ./autogen.sh autoconf - ./configure --without-makeinfo - make bootstrap - - make check + - make -C test filenotify-tests diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el index fb268b45138..18b755d7899 100644 --- a/test/lisp/filenotify-tests.el +++ b/test/lisp/filenotify-tests.el @@ -516,8 +516,9 @@ and the event to `file-notify--test-events'." (unless (string-match (regexp-quote ".#") (file-notify--event-file-name file-notify--test-event)) - ;;(message "file-notify--test-event-handler result: %s event: %S" - ;;(null (ert-test-failed-p result)) file-notify--test-event) + (when (getenv "EMACS_EMBA_CI") + (message "file-notify--test-event-handler result: %s event: %S" + (null (ert-test-failed-p result)) file-notify--test-event)) (setq file-notify--test-events (append file-notify--test-events `(,file-notify--test-event)) file-notify--test-results -- 2.39.5