More work on a default encoding so that running through cffi-uffi,

[clsql.git] / sql / pool.lisp

diff --git a/sql/pool.lisp b/sql/pool.lisp
index 8d73e67dab40a612306629cea582c91b5a76b30b..a153c916707aba2a31ff2b7b0ceabc5f248a6939 100644 (file)
--- 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