diff options
| author | Olivier Blin <oblin@mandriva.org> | 2004-10-16 17:37:45 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2004-10-16 17:37:45 +0000 |
| commit | 59c52202ce716b3fbad8cb9977aaa566bf96d132 (patch) | |
| tree | a1922048d53ea2f2cf8a2f1997ae002656361891 /perl-install | |
| parent | d215cdfa3162fe2c60f2ae779326775d397ab18b (diff) | |
| download | drakx-59c52202ce716b3fbad8cb9977aaa566bf96d132.tar drakx-59c52202ce716b3fbad8cb9977aaa566bf96d132.tar.gz drakx-59c52202ce716b3fbad8cb9977aaa566bf96d132.tar.bz2 drakx-59c52202ce716b3fbad8cb9977aaa566bf96d132.tar.xz drakx-59c52202ce716b3fbad8cb9977aaa566bf96d132.zip | |
(update) do not re-select the default interface every 5 seconds
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/net_monitor | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor index a7cc437d5..8c0d70cfb 100755 --- a/perl-install/standalone/net_monitor +++ b/perl-install/standalone/net_monitor @@ -450,11 +450,14 @@ sub update() { my $intf = $_; $notebook->remove_page($monitor->{$intf}{page}) unless member($intf,@intfs); } - for (my $num_p = 0; $num_p < $notebook->get_n_pages; $num_p++) { - if ($notebook->get_tab_label_text($notebook->get_nth_page($num_p)) eq $default_intf) { - $notebook->set_current_page($num_p); - last; - } + if (@intfs && !@interfaces) { + #- select the default interface at start + for (my $num_p = 0; $num_p < $notebook->get_n_pages; $num_p++) { + if ($notebook->get_tab_label_text($notebook->get_nth_page($num_p)) eq $default_intf) { + $notebook->set_current_page($num_p); + last; + } + } } @interfaces = @intfs; if ($isconnected != -2 && $isconnected != -1 && !$during_connection) { |