diff options
| -rw-r--r-- | perl-install/network.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network.pm b/perl-install/network.pm index 17b3a616c..2ee47426e 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -317,8 +317,8 @@ notation (for example, 1.2.3.4)."); $in->ask_from_entries_refH(_("Configuring network device %s", $intf->{DEVICE}), (_("Configuring network device %s", $intf->{DEVICE}) . ( $module ? _(" (driver $module)") : '' ) ."\n\n") . $text, - [ { label => _("IP address"), val => \$intf->{IPADDR} }, - { label => _("Netmask"), val => \$intf->{NETMASK} }, + [ { label => _("IP address"), val => \$intf->{IPADDR}, disabled => sub { $pump } }, + { label => _("Netmask"), val => \$intf->{NETMASK}, disabled => sub { $pump } }, { label => _("Automatic IP"), val => \$pump, type => "bool", text => _("(bootp/dhcp)") }, if_($intf->{wireless_eth}, { label => "WIRELESS_MODE", val => \$intf->{WIRELESS_MODE}, list => [ "Ad-hoc", "Managed", "Master", "Repeater", "Secondary", "Auto"] }, |