Bug #62515 for DBD-mysql: Faulty version check in foreign_key

Thu Oct 28 09:25:49 2010 bernt.johnsen [...] oracle.com - Ticket created

Subject:

Faulty version check in foreign_key_info

The version check in foreign_key_info fails to check the minor version. As a consequence foreign_key_info does not work for MySQL 5.6.1. The fix is easy, though: --- a/lib/DBD/mysql.pm +++ b/lib/DBD/mysql.pm @@ -638,7 +638,7 @@ sub foreign_key_info { # INFORMATION_SCHEMA.KEY_COLUMN_USAGE was added in 5.0.6 my ($maj, $min, $point) = _version($dbh); - return if $maj < 5 || ($maj == 5 && $point < 6); + return if $maj < 5 || ($maj == 5 && $min == 0 && $point < 6); my $sql = <<'EOF'; SELECT NULL AS PKTABLE_CAT,

Mon Oct 14 02:50:41 2013 MICHIELB [...] cpan.org - Correspondence added

Hi Bernt, Thanks for your report and sorry for the late reply. The issue you reported has already been fixed two years ago, although a little less subtle: https://github.com/perl5-dbi/DBD-mysql/commit/e66fa61923a682c3981e3ff0918861e625655f83 -- Mike On Thu Oct 28 09:25:49 2010, berntm wrote: Show quoted text

> The version check in foreign_key_info fails to check the minor version. > As a consequence foreign_key_info does not work for MySQL 5.6.1. > > The fix is easy, though: > > --- a/lib/DBD/mysql.pm > +++ b/lib/DBD/mysql.pm > @@ -638,7 +638,7 @@ sub foreign_key_info { > > # INFORMATION_SCHEMA.KEY_COLUMN_USAGE was added in 5.0.6 > my ($maj, $min, $point) = _version($dbh); > - return if $maj < 5 || ($maj == 5 && $point < 6); > + return if $maj < 5 || ($maj == 5 && $min == 0 && $point < 6); > > my $sql = <<'EOF'; > SELECT NULL AS PKTABLE_CAT,

Mon Oct 14 02:50:42 2013 The RT System itself - Status changed from 'new' to 'open'

Mon Oct 14 02:50:42 2013 MICHIELB [...] cpan.org - Status changed from 'open' to 'resolved'

Bug #62515 for DBD-mysql: Faulty version check in foreign_key_info