X-Git-Url: http://git.kpe.io/?p=umlisp.git;a=blobdiff_plain;f=sql.lisp;h=42b30802cd6fc8e9aa535a9b70edf3d472c6ad0e;hp=53c98e2c238a0ee32ce99807c010249b9b470338;hb=f894817b99c5b9624ebb7a0388f415ace23b8ce5;hpb=8a55a4e96c348baf47946391970d0c0f86c5345a

diff --git a/sql.lisp b/sql.lisp
index 53c98e2..42b3080 100644
--- a/sql.lisp
+++ b/sql.lisp
@@ -76,7 +76,9 @@
 (defun sql-connect ()
   "Connect to UMLS database, automatically used pooled connections"
   (clsql:connect (umls-connection-spec)
-                 :database-type *umls-sql-type* :pool t))
+                 :database-type *umls-sql-type*
+                 :encoding :utf-8
+                 :pool t))
 
 (defun sql-disconnect (conn)
   "Disconnect from UMLS database, but put connection back into pool"