diff options
| author | Damien Chaumette <dchaumette@mandriva.com> | 2004-01-29 18:36:07 +0000 |
|---|---|---|
| committer | Damien Chaumette <dchaumette@mandriva.com> | 2004-01-29 18:36:07 +0000 |
| commit | cc4ef5f7da30b3ce10c1736671ae62b997c349e4 (patch) | |
| tree | 55f3f6b88fde108567b05a9e58521be72850e848 /perl-install | |
| parent | 6c232a9bfae5a3d0c37ed70641f1acff1b553d28 (diff) | |
| download | drakx-backup-do-not-use-cc4ef5f7da30b3ce10c1736671ae62b997c349e4.tar drakx-backup-do-not-use-cc4ef5f7da30b3ce10c1736671ae62b997c349e4.tar.gz drakx-backup-do-not-use-cc4ef5f7da30b3ce10c1736671ae62b997c349e4.tar.bz2 drakx-backup-do-not-use-cc4ef5f7da30b3ce10c1736671ae62b997c349e4.tar.xz drakx-backup-do-not-use-cc4ef5f7da30b3ce10c1736671ae62b997c349e4.zip | |
beautify ethernet cards name
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakconnect | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index b82eb8c7b..e378da94b 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -196,6 +196,14 @@ sub manage { my $config = { 'ethernet0' => { kind => 'eth0' }, }; # testing + #- duplicated from network::ethernet, to be factorized + @all_cards = network::ethernet::get_eth_cards(); + foreach my $card (@all_cards) { + modules::remove_alias($card->[1]); + modules::add_alias($card->[0], $card->[1]); + } + my %name = map { $_->[0] => join(': ', $_->[0], $_->[2]) } @all_cards; + $window->{rwindow}->add(gtkpack_(Gtk2::VBox->new, 0, $interface_menu = gtksignal_connect(Gtk2::OptionMenu->new, changed => sub { @@ -226,6 +234,7 @@ sub manage { each_index { my ($name, $interface, $protocol) = ($_, $config->{$_}{kind}, $config->{$_}{protocol}); $gui->{$interface}{index} = $::i; + $interface =~ /eth/ and $config->{$name{$interface}} = $interface && delete $config->{$name}; build_tree($netc, $intf->{$interface} ||= {}, $name, $interface, $protocol); build_notebook($netc, $intf->{$interface}, $gui->{$interface}, $apply_button, $name, $interface); $notebook->append_page(gtkpack(Gtk2::VBox->new(0,0), $gui->{$interface}{notebook})); |