1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-08 06:38:12 -04:00

fixed versions detection from sqlite website

This commit is contained in:
Kenichi Ishigaki 2015-04-16 19:40:22 +09:00
parent 663e6e1ff4
commit eaf3dc37d0

View file

@ -204,10 +204,10 @@ sub extract_constants {
%constants;
}
my %bad_dist = map {$_ => 1} qw/3.6.16.1/;
my %bad_dist = map {$_ => 1} qw/3061601/;
sub versions {
my $res = HTTP::Tiny->new->get("http://sqlite.org/changes.html");
reverse grep {$_->as_num >= 3060100 && $bad_dist{$_->as_num}} map {s/_/./g; SQLiteUtil::Version->new($_)} $res->{content} =~ /name="version_(3_[\d_]+)"/g;
reverse grep {$_->as_num >= 3060100 && !$bad_dist{$_->as_num}} map {s/_/./g; SQLiteUtil::Version->new($_)} $res->{content} =~ /name="version_(3_[\d_]+)"/g;
}
sub srcdir {