X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-sqlite3%2Fsqlite3-sql.lisp;h=929aeceb92ed1e9011fdc6a4e9d30936442ffd44;hb=709d415122d04713da58a7c6d7ee10162c386a56;hp=1ba6b0ba68649deee35d6a367d1b9bc826095f08;hpb=b20e411ae9adfae42e8b8cf6277a4f9f0c672816;p=clsql.git diff --git a/db-sqlite3/sqlite3-sql.lisp b/db-sqlite3/sqlite3-sql.lisp index 1ba6b0b..929aece 100644 --- a/db-sqlite3/sqlite3-sql.lisp +++ b/db-sqlite3/sqlite3-sql.lisp @@ -287,7 +287,7 @@ return (let* ((raw-type (third field-info)) (start-length (position #\( raw-type)) - (type (string-trim '(#\space #\tab #\newline) + (type (string-trim clsql-sys::+whitespace-chars+ (if start-length (subseq raw-type 0 start-length) raw-type)))