diff options
Diffstat (limited to 'mdk-stage1/pcmcia_/merge_from_pcitable')
| -rwxr-xr-x | mdk-stage1/pcmcia_/merge_from_pcitable | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mdk-stage1/pcmcia_/merge_from_pcitable b/mdk-stage1/pcmcia_/merge_from_pcitable index 74fc56f31..27cda239b 100755 --- a/mdk-stage1/pcmcia_/merge_from_pcitable +++ b/mdk-stage1/pcmcia_/merge_from_pcitable @@ -41,9 +41,9 @@ print "Missing in pcitable:\n"; foreach my $p (@probes) { my @r = grep { $_->{vd} eq $p->{vd} } @pcitable; @r > 1 and die "duplicate entry in pcitable <$p->{vd}>\n"; - if (@r && $r[0]->{driver} ne 'yenta_socket') { - push @res, "0x$p->{vendor}\t0x$p->{device}\t\"yenta_socket\"\t\"$r[0]->{name}\"\n"; - $r[0]->{driver} ne 'unknown' and print STDERR "WARNING, driver for <$p->{vd}> was <$r[0]->{driver}>\n"; + if (!@r || @r && $r[0]->{driver} ne 'yenta_socket') { + push @res, "0x$p->{vendor}\t0x$p->{device}\t\"yenta_socket\"\t\"" . (@r ? $r[0]->{name} : '(COMPLETELY MISSING)') . "\"\n"; + @r and $r[0]->{driver} ne 'unknown' and print STDERR "WARNING, driver for <$p->{vd}> was <$r[0]->{driver}>\n"; } } print sort @res; |