[Emacs-diffs] feature/gnus-select 3a01434 108/218: * lisp/emacs-lisp/ert.el (ert-run-tests-batch): Print selector.

[Andrew G Cohen]

branch: feature/gnus-select
commit 3a01434fb6fdb84aa2e3d1d859c5fc31ee1fc421
Author: Michael Albinus <address@hidden>
Commit: Andrew G Cohen <address@hidden>

    * lisp/emacs-lisp/ert.el (ert-run-tests-batch): Print selector.
---
 lisp/emacs-lisp/ert.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index e4e166a..09cf28e 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -1360,9 +1360,10 @@ Returns the stats object."
        (run-started
         (unless ert-quiet
           (cl-destructuring-bind (stats) event-args
-            (message "Running %s tests (%s)"
+            (message "Running %s tests (%s, selector `%S')"
                      (length (ert--stats-tests stats))
-                     (ert--format-time-iso8601 (ert--stats-start-time 
stats))))))
+                     (ert--format-time-iso8601 (ert--stats-start-time stats))
+                     selector))))
        (run-ended
         (cl-destructuring-bind (stats abortedp) event-args
           (let ((unexpected (ert-stats-completed-unexpected stats))