diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-05-18 19:53:36 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-05-18 19:53:36 +0000 |
| commit | 7734dfba7ab665c81346a3c10144058e024eb21c (patch) | |
| tree | dfef1ebaa8efecb7a0c2f81597afabb610df7b06 | |
| parent | 8e185cf17268b0b35f0345c18e98b7f2768cd7e3 (diff) | |
| download | drakx-net-7734dfba7ab665c81346a3c10144058e024eb21c.tar drakx-net-7734dfba7ab665c81346a3c10144058e024eb21c.tar.gz drakx-net-7734dfba7ab665c81346a3c10144058e024eb21c.tar.bz2 drakx-net-7734dfba7ab665c81346a3c10144058e024eb21c.tar.xz drakx-net-7734dfba7ab665c81346a3c10144058e024eb21c.zip | |
do not override already selected provider
| -rw-r--r-- | lib/network/connection.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/network/connection.pm b/lib/network/connection.pm index 6efbe1b..e2ab8fe 100644 --- a/lib/network/connection.pm +++ b/lib/network/connection.pm @@ -164,7 +164,7 @@ sub guess_provider_settings { my @providers_data = $self->get_providers; my $locale_country = lang::c2name(ref($::o) && $::o->{locale}{country} || lang::read()->{country}); my $separator = $providers_data[1]; - $self->{provider_name} = find { /^\Q$locale_country$separator\E/ } sort(keys %{$providers_data[0]}); + $self->{provider_name} ||= find { /^\Q$locale_country$separator\E/ } sort(keys %{$providers_data[0]}); } sub set_provider { |