X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-mysql%2Fmysql-sql.lisp;h=c202a5e29d80aa929c3cafcbfae4fec113655a40;hb=2d7fb2dcce0f94745672b4f2aff6be39d610a063;hp=33d84e7ff3dbe9aa2ceccd229aa02edfb7f2b4bd;hpb=510b3d1d2d18c73ca222fce2b711f1b2f5025ba0;p=clsql.git

diff --git a/db-mysql/mysql-sql.lisp b/db-mysql/mysql-sql.lisp
index 33d84e7..c202a5e 100644
--- a/db-mysql/mysql-sql.lisp
+++ b/db-mysql/mysql-sql.lisp
@@ -41,7 +41,7 @@
     (dotimes (i num-fields)
       (declare (fixnum i))
       (let* ((field (uffi:deref-array field-vec '(:array mysql-field) i))
-	      (type (uffi:get-slot-value field 'mysql-field 'type)))
+	     (type (uffi:get-slot-value field 'mysql-field 'type)))
 	(push
 	 (case type
 	   ((#.mysql-field-types#tiny