diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2009-02-18 12:34:10 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2009-02-18 12:34:10 +0000 |
| commit | 7def7797b44018aa6ac83334c67d775ff47238d8 (patch) | |
| tree | 620e55e5e9516f8eb5e08ff94007345228c48a1d /perl-install | |
| parent | de21444e225aa772875927bee4e094eaab71d8a7 (diff) | |
| download | drakx-7def7797b44018aa6ac83334c67d775ff47238d8.tar drakx-7def7797b44018aa6ac83334c67d775ff47238d8.tar.gz drakx-7def7797b44018aa6ac83334c67d775ff47238d8.tar.bz2 drakx-7def7797b44018aa6ac83334c67d775ff47238d8.tar.xz drakx-7def7797b44018aa6ac83334c67d775ff47238d8.zip | |
rename 'key_ids' as 'key-ids' in order to follow urpmi naming policy
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install/media.pm | 8 |
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}, |