From 6ba0d5bcbaf34f93ae49fc1c8449611392affd9c Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 20 Jan 2004 12:23:13 +0000 Subject: add hidden option enabling to select dhcp client --- perl-install/network/netconnect.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index c07d27494..247bc1d3c 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -564,6 +564,7 @@ Modifying the fields below will override this configuration."), delete $ethntf->{NETWORK}; delete $ethntf->{BROADCAST}; @fields = qw(IPADDR NETMASK); + $netcnx->{dhcp_client} ||= "dhcp-client"; }, name => sub { join('', N("Configuring network device %s (driver %s)", $ethntf->{DEVICE}, $module), @@ -585,6 +586,8 @@ notation (for example, 1.2.3.4).")), { text => N("Track network card id (useful for laptops)"), val => \$track_network_id, type => "bool" }, { text => N("Network Hotplugging"), val => \$hotplug, type => "bool" }, { text => N("Start at boot"), val => \$onboot, type => "bool" }, + { label => N("DHCP client"), val => \$netcnx->{dhcp_client}, + list => ["dhcp-client", "dhcpcd", "dhcpxd"], advanced => 1 }, ], }, complete => sub { -- cgit v1.2.1