diff options
| author | Damien Chaumette <dchaumette@mandriva.com> | 2003-01-17 13:38:13 +0000 |
|---|---|---|
| committer | Damien Chaumette <dchaumette@mandriva.com> | 2003-01-17 13:38:13 +0000 |
| commit | ec86838b250290c417fdd9c0a9dea3818a24df6e (patch) | |
| tree | ea3b79701d5de1d8e5da5b69200c9d1703fb8b51 /perl-install/network/ethernet.pm | |
| parent | bdf8e16fdd32ea87090787b009053ca2e8961030 (diff) | |
| download | drakx-backup-do-not-use-ec86838b250290c417fdd9c0a9dea3818a24df6e.tar drakx-backup-do-not-use-ec86838b250290c417fdd9c0a9dea3818a24df6e.tar.gz drakx-backup-do-not-use-ec86838b250290c417fdd9c0a9dea3818a24df6e.tar.bz2 drakx-backup-do-not-use-ec86838b250290c417fdd9c0a9dea3818a24df6e.tar.xz drakx-backup-do-not-use-ec86838b250290c417fdd9c0a9dea3818a24df6e.zip | |
- some changes to dhcp behavior for beta2 (not clean yet)
Diffstat (limited to 'perl-install/network/ethernet.pm')
| -rw-r--r-- | perl-install/network/ethernet.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index 91eac7d69..b3e4eb1ee 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -195,6 +195,7 @@ sub configureNetwork { $last or return; if ($last->{BOOTPROTO} =~ /^(dhcp|bootp)$/) { $netc->{minus_one} = 1; + $netc->{DHCP} = 1; my $dhcp_hostname = $netc->{HOSTNAME}; $::isInstall and $in->set_help('configureNetworkHostDHCP'); $in->ask_from(N("Configuring network"), @@ -203,7 +204,8 @@ Some DHCP servers require the hostname to work. Your host name should be a fully-qualified host name, such as ``mybox.mylab.myco.com''."), [ { label => N("Host name"), val => \$netc->{HOSTNAME} } ]) or goto configureNetwork_step_1; - $netc->{HOSTNAME} ne $dhcp_hostname and $netc->{DHCP_HOSTNAME} = $netc->{HOSTNAME}; + #$netc->{HOSTNAME} ne $dhcp_hostname and $netc->{DHCP_HOSTNAME} = $netc->{HOSTNAME}; + $intf->{DHCP_HOSTNAME} = $netc->{HOSTNAME}; } else { configureNetworkNet($in, $netc, $last ||= {}, @l) or goto configureNetwork_step_1; } |