branch: elpa/emacsql
commit c4036cbdc8a8653661f60235e5ee732c27c7413d
Author: Christopher Wellons <[email protected]>
Commit: Christopher Wellons <[email protected]>
Move test print statement.
---
tests/emacsql-external-tests.el | 5 -----
tests/emacsql-tests.el | 7 ++++++-
2 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/tests/emacsql-external-tests.el b/tests/emacsql-external-tests.el
index 0a4a555eff..dbb673d073 100644
--- a/tests/emacsql-external-tests.el
+++ b/tests/emacsql-external-tests.el
@@ -24,11 +24,6 @@
(nreverse factories))
"List of connection factories to use in unit tests.")
-;; Print testing information
-(princ (format "\nTesting %d database(s): %S\n"
- (length emacsql-tests-connection-factories)
- (mapcar #'car emacsql-tests-connection-factories)))
-
(ert-deftest emacsql-basic ()
"A short test that fully interacts with SQLite."
(let ((emacsql-global-timeout emacsql-tests-timeout))
diff --git a/tests/emacsql-tests.el b/tests/emacsql-tests.el
index 1537485e81..5e556e0632 100644
--- a/tests/emacsql-tests.el
+++ b/tests/emacsql-tests.el
@@ -1,9 +1,14 @@
;;; emacsql-tests.el --- test suite for EmacSQL -*- lexical-binding: t; -*-
+(require 'cl-lib)
(require 'emacsql-compiler-tests)
(require 'emacsql-external-tests)
-;; Nothing to see here yet.
+;; Print testing information
+(cl-eval-when (load eval)
+ (princ (format "\nTesting %d database(s): %S\n"
+ (length emacsql-tests-connection-factories)
+ (mapcar #'car emacsql-tests-connection-factories))))
(provide 'emacsql-tests)
