From "Michael Pheasant <mike@pheasant.co.nz>"
authorNathan Bird <nathan@acceleration.net>
Mon, 24 Aug 2009 13:53:50 +0000 (09:53 -0400)
committerNathan Bird <nathan@acceleration.net>
Mon, 24 Aug 2009 13:55:38 +0000 (09:55 -0400)
commitd515348f04ea6a045ff639308269e89e22370036
tree46a34beb2435952a11d8fa3d33b3bc05d7df17cd
parent945ff67ce59c8be1bfdec385145a1d62fcad3352
From "Michael Pheasant <mike@pheasant.co.nz>"

Database-list ignores a supplied database name and instead uses
"mysql". It is possible that a mysql userid has permissions to issue
"show databases" but no permission to connect to db "mysql".
database-list gives an error in this scenario.

The following patch overcomes this by using the user-supplied db name
or else "mysql" if nil supplied.
db-mysql/mysql-sql.lisp