download.pl: cope with potential two-digit linux versions

SVN-Revision: 27376
master
Jo-Philipp Wich 13 years ago
parent 3d9f6f3d35
commit 0649dfdfb6
  1. 4
      scripts/download.pl

@ -136,9 +136,9 @@ foreach my $mirror (@ARGV) {
push @mirrors, "ftp://ftp.digex.net/pub/gnu/$1";
} elsif ($mirror =~ /^\@KERNEL\/(.+)$/) {
my @extra = ( $1 );
if ($filename =~ /linux-\d+\.\d+\.\d+-rc/) {
if ($filename =~ /linux-\d+\.\d+(?:\.\d+)?-rc/) {
push @extra, "$extra[0]/testing";
} elsif ($filename =~ /linux-(\d+\.\d+\.\d+)/) {
} elsif ($filename =~ /linux-(\d+\.\d+(?:\.\d+)?)/) {
push @extra, "$extra[0]/longterm/v$1";
}
foreach my $dir (@extra) {

Loading…
Cancel
Save