X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-ooddl.lisp;h=feb827ba707243859e5e046a6122026d69f8279e;hp=9883b7aff4fb58c89a589d0c5f1f919eac4acbed;hb=23b76563b25a517ad20f29d6dc5a65c8b958a042;hpb=afc88420d03b627b214473078c3adc201de2de80 diff --git a/tests/test-ooddl.lisp b/tests/test-ooddl.lisp index 9883b7a..feb827b 100644 --- a/tests/test-ooddl.lisp +++ b/tests/test-ooddl.lisp @@ -63,7 +63,7 @@ (deftest :ooddl/time/1 (let* ((now (clsql-base:get-time))) - (when (member *test-database-type* '(:postgresql :postgresql-socket)) + (when (member *test-database-underlying-type* '(:postgresql :postgresql-socket)) (clsql:execute-command "set datestyle to 'iso'")) (clsql:update-records [employee] :av-pairs `((birthday ,now)) :where [= [emplid] 1]) @@ -76,7 +76,7 @@ (deftest :ooddl/time/2 (let* ((now (clsql-base:get-time)) (fail-index -1)) - (when (member *test-database-type* '(:postgresql :postgresql-socket)) + (when (member *test-database-underlying-type* '(:postgresql :postgresql-socket)) (clsql:execute-command "set datestyle to 'iso'")) (dotimes (x 40) (clsql:update-records [employee] :av-pairs `((birthday ,now))