Turn off benign console messages when testing on Postgres

[clsql.git] / tests / test-init.lisp

diff --git a/tests/test-init.lisp b/tests/test-init.lisp
index 2481e8321a8bdf754602fda8a726986164dd31ac..c11a273155d013ed056b43fdef5628d0eb087a43 100644 (file)
--- a/tests/test-init.lisp
+++ b/tests/test-init.lisp
@@ -63,6 +63,10 @@
   (setf *test-database-underlying-type*
         (clsql-sys:database-underlying-type *default-database*))
 
+  ;; If Postgres, turn off notices to console
+  (when (eql db-type :postgresql)
+    (clsql:execute-command "SET client_min_messages = WARNING"))
+
   *default-database*)
 
 (defun default-suites ()