X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fdatabase.lisp;h=5344628358d9a579a380adf24541e4da65ad83fe;hb=feaad96160c29ce55d627745bbb168fa134cb8d0;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)))