From 3643c4bba3da780bf3eb7cfde157c69d3bbe91be Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 26 Jan 2004 22:17:22 +0000 Subject: (mapIntfToDevice) actually use given interface rather than hardcoded "eth0" --- perl-install/network/ethernet.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index ee74e16bb..a8c25ecb3 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -40,7 +40,7 @@ qq( sub mapIntfToDevice { my ($interface) = @_; - my ($bus, $slot, $_func) = map { hex($_) } (c::getHwIDs("eth0") =~ /([0-9a-f])+:([0-9a-f])+\.([0-9a-f]+)/); + my ($bus, $slot, $_func) = map { hex($_) } (c::getHwIDs($interface) =~ /([0-9a-f])+:([0-9a-f])+\.([0-9a-f]+)/); grep { $_->{pci_bus} == $bus && $_->{pci_device} == $slot } detect_devices::probeall(); } -- cgit v1.2.1