summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-08-21 08:36:08 +0000
committerFrancois Pons <fpons@mandriva.com>2003-08-21 08:36:08 +0000
commit85098bb5fda94183422ec8284f6de1ad0faf57d8 (patch)
tree79f8604d97928d33f645a978e943fe967dd12bd8 /perl-install/install_any.pm
parentf4c0757c0891935f8cb022ab1d280c088601da80 (diff)
downloaddrakx-backup-do-not-use-85098bb5fda94183422ec8284f6de1ad0faf57d8.tar
drakx-backup-do-not-use-85098bb5fda94183422ec8284f6de1ad0faf57d8.tar.gz
drakx-backup-do-not-use-85098bb5fda94183422ec8284f6de1ad0faf57d8.tar.bz2
drakx-backup-do-not-use-85098bb5fda94183422ec8284f6de1ad0faf57d8.tar.xz
drakx-backup-do-not-use-85098bb5fda94183422ec8284f6de1ad0faf57d8.zip
make sure other key are added to urpmi.cfg when imported.
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 5bf629d00..a4e9bc4ec 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -502,8 +502,8 @@ sub install_urpmi {
require URPM::Signature;
my $db = pkgs::rpmDbOpenForInstall($prefix);
$packages->parse_pubkeys(db => $db);
- foreach (values %$mediums) {
- foreach my $k (@{$_->{pubkey}}) {
+ foreach my $medium (values %$mediums) {
+ foreach my $k (@{$medium->{pubkey}}) {
my $id;
foreach my $kv (values %{$packages->{keys} || {}}) {
URPM::compare_pubkeys($k, $kv) == 0 and $id = $kv->{id}, last;
@@ -516,7 +516,7 @@ sub install_urpmi {
}
}
#- the key has been found, take care of it for the given medium.
- $id and $_->{key_ids}{$id} = undef;
+ $id and $medium->{key_ids}{$id} = undef;
}
}