diff options
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/harddrake/data.pm | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 8f38551f8..3491919df 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -12,6 +12,7 @@ (else we could just list all ATA controllers together) o do not show duplicated hardware as unknown (#46242): * list PC Speaker as sound card + * track duplicated input devices Version 11.71 - 6 November 2008 diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index f51350a32..1c64e1dab 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -478,7 +478,7 @@ our @tree = detector => sub { f(grep { $_->{description} =~ /Keyboard/i || $_->{media_type} =~ /Subclass\|Keyboard/i } @devices), # USB devices are filtered out since we already catch them through probeall(): - grep { $_->{bus} ne 'usb' && $_->{driver} eq 'kbd' && $_->{description} !~ /PC Speaker/ } detect_devices::getInputDevices(); + f(grep { $_->{bus} ne 'usb' && $_->{driver} eq 'kbd' && $_->{description} !~ /PC Speaker/ } detect_devices::getInputDevices()); }, checked_on_boot => 0, }, @@ -500,7 +500,7 @@ our @tree = detector => sub { f(grep { $_->{driver} =~ /^Mouse:|^Tablet:/ || $_->{media_type} =~ /class\|Mouse/ } @devices), # USB devices are filtered out since we already catch them through probeall(): - grep { $_->{bus} ne 'usb' && $_->{Handlers}{mouse} } detect_devices::getInputDevices(); + f(grep { $_->{bus} ne 'usb' && $_->{Handlers}{mouse} } detect_devices::getInputDevices()); }, checked_on_boot => 1, automatic => 1, |