X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Fds-artists.lisp;h=f4d327103b2897a9173da9a020d1f8fd862cdc48;hp=4637fde97a31919d45c45d2d35a3ef2d8a327285;hb=9fe9142259cca16202f35f66cbb35419752dd54d;hpb=818295fa37036acb348ff24ea926b9d7c9f33cba diff --git a/tests/ds-artists.lisp b/tests/ds-artists.lisp index 4637fde..f4d3271 100644 --- a/tests/ds-artists.lisp +++ b/tests/ds-artists.lisp @@ -1,6 +1,6 @@ (in-package #:clsql-tests) -#.(clsql:locally-enable-sql-reader-syntax) +(clsql-sys:file-enable-sql-reader-syntax) (defparameter artist1 nil) @@ -12,11 +12,6 @@ (genre :accessor genre :initarg :genre :type (varchar 10) :db-constraints (:default "'Unknown'")))) (defun initialize-ds-artists () - ; (start-sql-recording :type :both) - ; (let ((*backend-warning-behavior* - ; (if (member *test-database-type* '(:postgresql :postgresql-socket)) - ; :ignore - ; :warn))) (mapc #'clsql:create-view-from-class '(artist)) @@ -34,4 +29,3 @@ (mapc #'clsql-sys:drop-sequence (list "artist_artist_id_seq")))))) -#.(clsql:restore-sql-reader-syntax-state)