diff options
| author | Damien Chaumette <dchaumette@mandriva.com> | 2004-02-04 15:45:01 +0000 |
|---|---|---|
| committer | Damien Chaumette <dchaumette@mandriva.com> | 2004-02-04 15:45:01 +0000 |
| commit | cf9f343cafead0e447f174f5bfab5b1ee8893839 (patch) | |
| tree | bf74ebb1e0b6eb5d85e67fbf05ecd253f042ca96 /perl-install/standalone | |
| parent | cbcbec48e838d6b5b44baf9a253b8a0f4c7cf93f (diff) | |
| download | drakx-cf9f343cafead0e447f174f5bfab5b1ee8893839.tar drakx-cf9f343cafead0e447f174f5bfab5b1ee8893839.tar.gz drakx-cf9f343cafead0e447f174f5bfab5b1ee8893839.tar.bz2 drakx-cf9f343cafead0e447f174f5bfab5b1ee8893839.tar.xz drakx-cf9f343cafead0e447f174f5bfab5b1ee8893839.zip | |
- add network::ethernet::get_eth_cards_names
- kill duplicated code
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakconnect | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 2551b0240..61ae5fa8d 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -196,13 +196,8 @@ sub manage { my $config = {}; eval(cat_('/etc/sysconfig/drakconnect')); - #- 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; + my %name = network::ethernet::get_eth_cards_names(@all_cards); $window->{rwindow}->add(gtkpack_(Gtk2::VBox->new, 0, $interface_menu = gtksignal_connect(Gtk2::OptionMenu->new, |