X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fpool.lisp;h=a153c916707aba2a31ff2b7b0ceabc5f248a6939;hb=bd6843e2084ce45d3d7b769e383c3cac589b5e93;hp=8d73e67dab40a612306629cea582c91b5a76b30b;hpb=77db058c5b8a2e6db10f07acb159e1d9709e6403;p=clsql.git

diff --git a/sql/pool.lisp b/sql/pool.lisp
index 8d73e67..a153c91 100644
--- a/sql/pool.lisp
+++ b/sql/pool.lisp
@@ -35,7 +35,7 @@
 
 
 
-(defun acquire-from-pool (connection-spec database-type &optional pool encoding)
+(defun acquire-from-pool (connection-spec database-type &optional pool (encoding *default-encoding*))
   "Try to find a working database connection in the pool or create a new
 one if needed. This performs 1 query against the DB to ensure it's still
 valid. When possible (postgres, mssql) that query will be a reset