From 90679011a05cdc1e9c253c104c85701b6d285798 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 9 Jan 2003 13:11:55 +0000 Subject: - fix priority - add a log --- perl-install/network/network.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/network/network.pm') diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index b5648a6d0..95ae5f039 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -426,7 +426,9 @@ sub easy_dhcp { my @all_cards = network::ethernet::conf_network_card_backend(); #- only for a single network card - any { $_->[0] eq 'eth0' } @all_cards && every { $_->[0] ne 'eth1' } @all_cards or return; + (any { $_->[0] eq 'eth0' } @all_cards) && (every { $_->[0] ne 'eth1' } @all_cards) or return; + + log::l("easy_dhcp: found eth0"); network::ethernet::conf_network_card_backend($netc, $intf, 'dhcp', 'eth0'); -- cgit v1.2.1