projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
New file clsql-cffi.asd
[clsql.git]
/
db-mysql
/
mysql-client-info.lisp
diff --git
a/db-mysql/mysql-client-info.lisp
b/db-mysql/mysql-client-info.lisp
index 0721194e41243ee15fab38eef505a353b1a8a2dd..54d97243a8bc46e1316809766f6c303a68755c0e 100644
(file)
--- 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)
(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*)))))
(t
(error "Unknown mysql client version '~A'." *mysql-client-info*)))))