X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-init.lisp;h=3efa6d62d193130c0431a0142afb8ab1796a7123;hp=c428467f1882bb4aa49cb5797727d94e332e35ae;hb=1011d4f44384e10f45ea0268e5c7fc759f417d3e;hpb=9b248752b3d64b8828ea05a96e168d42ea980518 diff --git a/tests/test-init.lisp b/tests/test-init.lisp index c428467..3efa6d6 100644 --- a/tests/test-init.lisp +++ b/tests/test-init.lisp @@ -26,6 +26,8 @@ (defvar *rt-oodml*) (defvar *rt-syntax*) (defvar *rt-time*) +;; Below must be set as nil since test-i18n.lisp is not loaded on all platforms. +(defvar *rt-i18n* nil) (defvar *test-database-type* nil) (defvar *test-database-underlying-type* nil) @@ -61,12 +63,16 @@ (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 () "The default list of tests to run." (append *rt-internal* *rt-connection* *rt-basic* *rt-fddl* *rt-fdml* - *rt-ooddl* *rt-oodml* *rt-syntax* *rt-time*)) + *rt-ooddl* *rt-oodml* *rt-syntax* *rt-time* *rt-i18n*)) (defvar *error-count* 0) @@ -288,12 +294,13 @@ (clsql-sys:in test :oodml/select/12 :oodml/select/13 :oodml/select/14 :oodml/select/15 :oodml/select/16 :oodml/select/17 :oodml/select/18 :oodml/select/19 :oodml/select/20 - :oodml/select/21 :oodml/select/22 + :oodml/select/21 :oodml/select/22 :oodml/select/23 :oodml/update-records/4 :oodml/update-records/4-slots :oodml/update-records/5 :oodml/update-records/5-slots :oodml/update-records/6 :oodml/update-records/7 :oodml/update-records/8 :oodml/update-records/9 - :oodml/update-records/9-slots :oodml/update-instance/3 + :oodml/update-records/9-slots :oodml/update-records/10 + :oodml/update-records/11 :oodml/update-instance/3 :oodml/update-instance/4 :oodml/update-instance/5 :oodml/update-instance/6 :oodml/update-instance/7 :oodml/db-auto-sync/3 :oodml/db-auto-sync/4))