summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/media.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index a009e3f12..08337f757 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -30,7 +30,7 @@ use urpm::download;
#- fakemedium ("$name ($rpmsdir)", used locally by urpmi)
#- rel_hdlist
#- hdlist_size
-#- key_ids (hashref, values are key ids)
+#- key-ids (hashref, values are key ids)
#- name (text description)
#- pubkey (array containing all the keys to import)
#- phys_medium
@@ -929,7 +929,7 @@ sub install_urpmi {
my ($id, $imported) = @_;
if ($id) {
log::l(($imported ? "imported" : "found") . " key=$id for medium $medium->{name}");
- $medium->{key_ids}{$id} = undef;
+ $medium->{'key-ids'}{$id} = undef;
}
});
unlink $medium->{pubkey};
@@ -967,8 +967,8 @@ sub install_urpmi {
#- output new urpmi.cfg format here.
push @cfg, map { "$_\n" }
"$qname $qdir {",
- if_(keys(%{$medium->{key_ids}}),
- " key-ids: " . join(',', keys %{$medium->{key_ids}})),
+ if_(keys(%{$medium->{'key-ids'}}),
+ " key-ids: " . join(',', keys %{$medium->{'key-ids'}})),
if_($removable_device,
" removable: $removable_device"),
if_($medium->{update},