X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-mysql%2Fmysql-client-info.lisp;h=54d97243a8bc46e1316809766f6c303a68755c0e;hp=0721194e41243ee15fab38eef505a353b1a8a2dd;hb=eaea8232bda93fd38410e46dd22ec954b2fc4a18;hpb=aaffeb0415e1caaf1595bee7a5e9d58379c4431e diff --git a/db-mysql/mysql-client-info.lisp b/db-mysql/mysql-client-info.lisp index 0721194..54d9724 100644 --- a/db-mysql/mysql-client-info.lisp +++ b/db-mysql/mysql-client-info.lisp @@ -42,7 +42,10 @@ (string-equal "4.1" *mysql-client-info* :end2 3)) (pushnew :mysql-client-v4.1 cl:*features*))) ((eql (schar *mysql-client-info* 0) #\5) - (pushnew :mysql-client-v5 cl:*features*)) + (pushnew :mysql-client-v5 cl:*features*) + (when (and (>= (length *mysql-client-info*) 3) + (string-equal "5.1" *mysql-client-info* :end2 3)) + (pushnew :mysql-client-v5.1 cl:*features*))) (t (error "Unknown mysql client version '~A'." *mysql-client-info*)))))