X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-ooddl.lisp;h=5be105c0f27ed24892507779c7e7347f03fed421;hb=b50166ae0ba2bc09a9094c0e675ec92010b7293e;hp=b1310718dfdab812ff4032d8e9725bedf4b344f3;hpb=d2d49ab13c98bc7a1819a0fd3968268a5567bdc3;p=clsql.git

diff --git a/tests/test-ooddl.lisp b/tests/test-ooddl.lisp
index b131071..5be105c 100644
--- a/tests/test-ooddl.lisp
+++ b/tests/test-ooddl.lisp
@@ -17,7 +17,7 @@
 
 (in-package #:clsql-tests)
 
-#.(clsql:locally-enable-sql-reader-syntax)
+(clsql-sys:file-enable-sql-reader-syntax)
 
 
 (def-view-class big ()
@@ -107,10 +107,10 @@
     ;; and stick a value in there.
     (progn (clsql-sys:create-view-from-class 'big)
 	   (values
-	     (clsql:table-exists-p [big] :owner *test-database-user*)
+	     (clsql:table-exists-p [big] )
 	     (progn
 	       (clsql:drop-table [big] :if-does-not-exist :ignore)
-	       (clsql:table-exists-p [big] :owner *test-database-user*)))
+	       (clsql:table-exists-p [big] )))
 	   )
   t nil)
 
@@ -184,5 +184,4 @@
 
 ))
 
-#.(clsql:restore-sql-reader-syntax-state)