diff options
| author | Francois Pons <fpons@mandriva.com> | 2003-10-28 17:32:00 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2003-10-28 17:32:00 +0000 |
| commit | c04351c1f727f90442ade00546c0f25173899fb3 (patch) | |
| tree | ed7c764da184d921d67dd4aa5d805911c121ea83 /perl-install | |
| parent | 7625605f81761af1d938a3fa4a7f87d1291ebccb (diff) | |
| download | drakx-c04351c1f727f90442ade00546c0f25173899fb3.tar drakx-c04351c1f727f90442ade00546c0f25173899fb3.tar.gz drakx-c04351c1f727f90442ade00546c0f25173899fb3.tar.bz2 drakx-c04351c1f727f90442ade00546c0f25173899fb3.tar.xz drakx-c04351c1f727f90442ade00546c0f25173899fb3.zip | |
fixed for ongoing bug since at least 9.0 for alias not reported in current installation.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/modules.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 0de238880..27f63316c 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -232,7 +232,7 @@ sub mergein_conf { my ($file) = @_; my $modconfref = read_conf($file); while (my ($key, $value) = each %$modconfref) { - $conf{$key}{alias} = $value->{alias} if !exists $conf{$key}{alias}; + $conf{$key}{alias} = $value->{alias} if ! $conf{$key}{alias}; $conf{$key}{options} = $value->{options} if $value->{options}; push @{$conf{$key}{probeall} ||= []}, deref($value->{probeall}); } |