14 lines
783 B
Diff
14 lines
783 B
Diff
diff -up DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm.fix DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm
|
|
--- DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm.fix 2008-07-21 17:15:05.000000000 +0200
|
|
+++ DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm 2008-07-28 09:01:08.000000000 +0200
|
|
@@ -274,6 +274,9 @@ my $get_version = sub {
|
|
# New versions, such as "7.4", are treated as patch level "0"
|
|
@{$self}{qw(version major minor patch)} =
|
|
($version, $1, $2, 0);
|
|
+ } elsif ($version =~ /(\d+)\.(\d+)/) {
|
|
+ @{$self}{qw(version major minor patch)} =
|
|
+ ($version, $1, $2, 0);
|
|
} else {
|
|
$self->error("Failed to parse PostgreSQL version parts from " .
|
|
"string '$version'");
|