diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/network.pm | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index ea16b36dc..eff3ce5cd 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -363,7 +363,6 @@ sub easy_dhcp { return if text2bool($netc->{NETWORKING}); require modules; - require network::ethernet; modules::load_category($modules_conf, 'network/main|gigabit|pcmcia|usb'); my @all_dev = sort map { $_->[0] } network::ethernet::get_eth_cards($modules_conf); @@ -374,12 +373,19 @@ sub easy_dhcp { my $dhcp_intf = $ether_dev[0]; log::explanations("easy_dhcp: found $dhcp_intf"); - network::ethernet::conf_network_card_backend($netc, $intf, 'dhcp', $dhcp_intf); - - put_in_hash($netc, { + put_in_hash($netc, { NETWORKING => "yes", DHCP => "yes", + NET_DEVICE => $dhcp_intf, + NET_INTERFACE => $dhcp_intf, }); + $intf->{$dhcp_intf} ||= {}; + put_in_hash($intf->{$dhcp_intf}, { + DEVICE => $dhcp_intf, + BOOTPROTO => 'dhcp', + NETMASK => '255.255.255.0', + ONBOOT => 'yes' + }); 1; } |