diff options
author | Francois Pons <fpons@mandriva.com> | 2000-09-07 09:56:50 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2000-09-07 09:56:50 +0000 |
commit | 3f7b015463a0138d3e2e1b99aef31890f2768f24 (patch) | |
tree | 554992ed542cbf1e92da9940f3d213f48e9c4888 /perl-install | |
parent | ad9cd7aac5a63fbffc038ea9083928aa0f2524e3 (diff) | |
download | drakx-3f7b015463a0138d3e2e1b99aef31890f2768f24.tar drakx-3f7b015463a0138d3e2e1b99aef31890f2768f24.tar.gz drakx-3f7b015463a0138d3e2e1b99aef31890f2768f24.tar.bz2 drakx-3f7b015463a0138d3e2e1b99aef31890f2768f24.tar.xz drakx-3f7b015463a0138d3e2e1b99aef31890f2768f24.zip |
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/network.pm | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index 323861a41..51d094e46 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -306,24 +306,24 @@ You may also enter the IP address of the gateway if you have one"), } - sub configureNetwork2 { - my ($in, $prefix, $netc, $intf) = @_; - my $etc = "$prefix/etc"; - - write_conf("$etc/sysconfig/network", $netc); - write_resolv_conf("$etc/resolv.conf", $netc); - write_interface_conf("$etc/sysconfig/network-scripts/ifcfg-$_->{DEVICE}", $_) foreach @{$intf}; - add2hosts("$etc/hosts", $netc->{HOSTNAME}, map { $_->{IPADDR} } @{$intf}); - sethostname($netc) unless $::testing; - addDefaultRoute($netc) unless $::testing; - - $in->pkg_install("dhcpcd") if grep { $_->{BOOTPROTO} =~ /^(dhcp)$/ } @{$intf}; - # Handle also pump (this is still in initscripts no?) - $in->pkg_install("pump") if grep { $_->{BOOTPROTO} =~ /^(pump|bootp)$/ } @{$intf}; - #-res_init(); #- reinit the resolver so DNS changes take affect - - any::miscellaneousNetwork($in, $prefix); - } +sub configureNetwork2 { + my ($in, $prefix, $netc, $intf) = @_; + my $etc = "$prefix/etc"; + + write_conf("$etc/sysconfig/network", $netc); + write_resolv_conf("$etc/resolv.conf", $netc); + write_interface_conf("$etc/sysconfig/network-scripts/ifcfg-$_->{DEVICE}", $_) foreach @{$intf}; + add2hosts("$etc/hosts", $netc->{HOSTNAME}, map { $_->{IPADDR} } @{$intf}); + sethostname($netc) unless $::testing; + addDefaultRoute($netc) unless $::testing; + + $in->pkg_install("dhcpcd") if grep { $_->{BOOTPROTO} =~ /^(dhcp)$/ } @{$intf}; + # Handle also pump (this is still in initscripts no?) + $in->pkg_install("pump") if grep { $_->{BOOTPROTO} =~ /^(pump|bootp)$/ } @{$intf}; + #-res_init(); #- reinit the resolver so DNS changes take affect + + any::miscellaneousNetwork($in, $prefix); +} sub configureNetworkIntf { |