From f3aca7f00cfd07bedd6836c957bdcba75132d9d2 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 9 Feb 2004 16:58:59 +0000 Subject: (mapIntfToDevice) fix pci/usb ethernet devices matching --- perl-install/network/ethernet.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm index 7f05db43d..b550c6fc9 100644 --- a/perl-install/network/ethernet.pm +++ b/perl-install/network/ethernet.pm @@ -38,7 +38,7 @@ qq( sub mapIntfToDevice { my ($interface) = @_; - my ($bus, $slot, $_func) = map { hex($_) } (c::getHwIDs($interface) =~ /([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