diff options
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/detect_devices.pm | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index c568a5c7a..e878ca98a 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,4 +1,5 @@ - fix getting UUID on mdmadm (eg: md0) devices +- getInputDevices(): keep "Bus=..." for drakx-kbd-mouse-x11 Version 10.4.202 - 17 September 2007, by Thierry Vignaud diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 249f0df6a..b1e9fc907 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -425,6 +425,7 @@ sub getInputDevices() { $device = {}; $device->{vendor} = /Vendor=(\w+)/ && $1; $device->{id} = /Product=(\w+)/ && $1; + $device->{bustype} = /Bus=(\w+)/ && $1; } elsif (/N: Name="(.*)"/) { my $descr = $1; $device->{description} = "|$descr"; |