X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-sqlite3%2Fsqlite3-sql.lisp;h=8ce592c6fbe1978f1e0d0ee824b33f4ae9ca05a3;hb=2957beac4e7ec04dd4420e4d1f9e300fee496508;hp=4f953d013212fc5d63d9dd02026745c7bc8ecb8d;hpb=22f792cf09747cce9998bed27bbd7ea3cf21b878;p=clsql.git diff --git a/db-sqlite3/sqlite3-sql.lisp b/db-sqlite3/sqlite3-sql.lisp index 4f953d0..8ce592c 100644 --- a/db-sqlite3/sqlite3-sql.lisp +++ b/db-sqlite3/sqlite3-sql.lisp @@ -205,13 +205,11 @@ (sqlite3:sqlite3-column-blob stmt i) (car types) :length (sqlite3:sqlite3-column-bytes stmt i) - :encoding (or (encoding database) - :utf-8)) + :encoding (encoding database)) (clsql-uffi:convert-raw-field (sqlite3:sqlite3-column-text stmt i) (car types) - :encoding (or (encoding database) - :utf-8)))))) + :encoding (encoding database)))))) (when field-names (setf col-names (loop for n from 0 below n-col collect (sqlite3:sqlite3-column-name stmt n))))