X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-ooddl.lisp;h=b1310718dfdab812ff4032d8e9725bedf4b344f3;hb=eda507c3d35f484755f88f6bbbf3f9a880324a97;hp=a5db79f0f5b2268274724008f6241a7083c2c318;hpb=ec1872df0ec2761b4ab6811dc12f960f6f455819;p=clsql.git diff --git a/tests/test-ooddl.lisp b/tests/test-ooddl.lisp index a5db79f..b131071 100644 --- a/tests/test-ooddl.lisp +++ b/tests/test-ooddl.lisp @@ -107,10 +107,10 @@ ;; and stick a value in there. (progn (clsql-sys:create-view-from-class 'big) (values - (clsql:table-exists-p [big] ) + (clsql:table-exists-p [big] :owner *test-database-user*) (progn (clsql:drop-table [big] :if-does-not-exist :ignore) - (clsql:table-exists-p [big]))) + (clsql:table-exists-p [big] :owner *test-database-user*))) ) t nil)