X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fdatabase.lisp;h=5344628358d9a579a380adf24541e4da65ad83fe;hb=66ed75626689968e1faa7603a36954ef4364b2e2;hp=83fe7d6a6df739e24dbedbf88fd2beecf4a0aab2;hpb=be383802fc1f47547eef6d57945023ff71d45657;p=clsql.git diff --git a/sql/database.lisp b/sql/database.lisp index 83fe7d6..5344628 100644 --- a/sql/database.lisp +++ b/sql/database.lisp @@ -99,7 +99,8 @@ be taken from this pool." (asdf:operate 'asdf:load-op (ensure-keyword (concatenate 'string (symbol-name '#:clsql-) - (symbol-name database-type))))) + (symbol-name database-type))) + :verbose nil)) (if pool (let ((conn (acquire-from-pool connection-spec database-type pool)))