scripts/download.pl: fix broken link for KERNEL projects

Fix broken link generation for KERNEL projects.

Using $1 in projectsmirrors sub was still referencing the caller $1
instead of the remaining args of projectsmirrors sub.

Use shift and put the second arg of projectsmirrors sub in $append to
correctly handle the sub args.

Fixes: 465cf358881c ("scripts/download.pl: detach mirror URLs from script file")
Signed-off-by: Christian Marangi <ansuelsmth@gmail.com>

diff --git a/scripts/download.pl b/scripts/download.pl
index eba48e84a0a46423497ce78598708d7b94febda8..5449a3406aa96f4312dc76a33f8d46566049129e 100755 (executable)
--- a/scripts/download.pl
+++ b/scripts/download.pl
@@ -59,6 +59,7 @@ sub localmirrors {
 
 sub projectsmirrors {
        my $project = shift;
+       my $append = shift;
 
        open (PM, "$scriptdir/projectsmirrors.json") ||
                die "Can´t open $scriptdir/projectsmirrors.json: $!\n";
@@ -67,7 +68,7 @@ sub projectsmirrors {
        my $mirror = decode_json $mirror_json;
 
        foreach (@{$mirror->{$project}}) {
-               push @mirrors, $_ . "/" . ($1 or "");
+               push @mirrors, $_ . "/" . ($append or "");
        }
 }