diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-07-08 18:24:19 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-07-08 18:24:19 +0000 |
commit | e2367682f825f7375400764e9c24b13c622472ee (patch) | |
tree | 75f9b324ca2f5b6b6ebf1cd54796b916abfebe3c /urpm/get_pkgs.pm | |
parent | 938f1fedeb29abfdd39064bc47a29dcc1e3fd27d (diff) | |
download | urpmi-e2367682f825f7375400764e9c24b13c622472ee.tar urpmi-e2367682f825f7375400764e9c24b13c622472ee.tar.gz urpmi-e2367682f825f7375400764e9c24b13c622472ee.tar.bz2 urpmi-e2367682f825f7375400764e9c24b13c622472ee.tar.xz urpmi-e2367682f825f7375400764e9c24b13c622472ee.zip |
rename/create vars for clarity
Diffstat (limited to 'urpm/get_pkgs.pm')
-rw-r--r-- | urpm/get_pkgs.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/urpm/get_pkgs.pm b/urpm/get_pkgs.pm index 09a352bb..db1df5a2 100644 --- a/urpm/get_pkgs.pm +++ b/urpm/get_pkgs.pm @@ -236,16 +236,17 @@ sub _download_packages_of_distant_media { #- there have been problems downloading them at least once, this #- is necessary to keep track of failing downloads in order to #- present the error to the user. - foreach my $i (keys %{$blist->{list}}) { - my ($filename) = $blist->{list}{$i} =~ m|/([^/]*\.rpm)$|; + foreach my $id (keys %{$blist->{list}}) { + my $url = $blist->{list}{$i}; + my ($filename) = $url =~ m|/([^/]*\.rpm)$|; if ($filename && -s "$cachedir/partial/$filename") { if (my $rpm = verify_partial_rpm_and_move($urpm, $cachedir, $filename)) { - $sources->{$i} = $rpm; + $sources->{$id} = $rpm; } else { - $errors->{$i} = [ $blist->{list}{$i}, 'bad' ]; + $errors->{$id} = [ $url, 'bad' ]; } } else { - $errors->{$i} = [ $blist->{list}{$i}, 'missing' ]; + $errors->{$id} = [ $url, 'missing' ]; } } } |