diff options
-rw-r--r-- | lib/network/netconnect.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/network/netconnect.pm b/lib/network/netconnect.pm index 6bbefe5..1aba4d3 100644 --- a/lib/network/netconnect.pm +++ b/lib/network/netconnect.pm @@ -202,13 +202,13 @@ sub real_main { }, name => sub { $net->{type}->get_type_name . "\n\n" . N("Please select your provider:") }, data => sub { - [ { type => "list", val => \$self->{provider_name}, separator => $providers_data[1], - list => [ N("Unlisted - edit manually"), sort(keys %{$providers_data[0]}) ], sort => 0 } ]; - }, - post => sub { - $self->_set_provider; - $get_next->("select_provider"); + [ { + type => "list", val => \$self->{provider_name}, separator => $providers_data[1], + list => [ N("Unlisted - edit manually"), sort(keys %{$providers_data[0]}) ], sort => 0, + changed => { $self->set_provider }, + } ]; }, + post => sub { $get_next->("select_provider") }, }, select_network => { |