From 076d81eaaea229d7e0885113e008eb04fdf8591f Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 2 Aug 2007 14:32:47 +0000
Subject: do not use field {driver} from getInputDevices(), it may break
 (#31584)

---
 perl-install/harddrake/data.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index bd9f1f656..cec74e79f 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -494,7 +494,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' && $_->{driver} =~ /mouse/ } detect_devices::getInputDevices();
+            grep { $_->{bus} ne 'usb' && $_->{Handlers}{mouse} } detect_devices::getInputDevices();
       },
       checked_on_boot => 1,
       automatic => 1,
-- 
cgit v1.2.1