summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-03-05 13:58:31 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-03-05 13:58:31 +0000
commit9589fcf98e635aa680ab7caf96f093ddece88961 (patch)
tree6c82743537c915db07e143b39afabb7c36127665 /perl-install
parentfbcdc89dfd7f9f93e68715c32b70d9bd46da8dc6 (diff)
downloaddrakx-9589fcf98e635aa680ab7caf96f093ddece88961.tar
drakx-9589fcf98e635aa680ab7caf96f093ddece88961.tar.gz
drakx-9589fcf98e635aa680ab7caf96f093ddece88961.tar.bz2
drakx-9589fcf98e635aa680ab7caf96f093ddece88961.tar.xz
drakx-9589fcf98e635aa680ab7caf96f093ddece88961.zip
prevent warning when using diagnostics pragma (easier debugging)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/harddrake/data.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 402e49903..d5121a8de 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -55,7 +55,7 @@ our @tree =
my @usbnet = qw(CDCEther catc kaweth nvnet pegasus usbnet); # rought hack for nforce2's nvet
# should be taken from detect_devices.pm or modules.pm. it's identical
- grep { $_->{media_type} =~ /^NETWORK/ || member($_->{driver}, @usbnet) || $_->{type} eq 'network' } @devices }, 1 ],
+ grep { $_->{media_type} && $_->{media_type} =~ /^NETWORK/ || member($_->{driver}, @usbnet) || $_->{type} && $_->{type} eq 'network' } @devices }, 1 ],
[ "MODEM", , N("Modem"), "modem.png", "", sub { detect_devices::getSpeedtouch(), detect_devices::getSagem(), detect_devices::getModem() }, 0 ],
[ "BRIDGE", , N("Bridges and system controllers"), "memory.png", "", sub { grep { $_->{media_type} =~ /BRIDGE|MEMORY_RAM/ && $_->{driver} ne 'nvnet' } @devices }, 0 ],
[ "UNKNOWN", , N("Unknown/Others"), "unknown.png", "", \&unknown, 0 ],