diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-12-16 16:13:34 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-12-16 16:13:34 +0000 |
| commit | 3bf40616e233d127ecc0c1f90edd740d23a361ca (patch) | |
| tree | 123688226f45977d93c97ab68635dfd492a5f54d /perl-install/standalone/mousedrake | |
| parent | e76ac94274b3c3e3bb809f9a73718a56e652631b (diff) | |
| download | drakx-backup-do-not-use-3bf40616e233d127ecc0c1f90edd740d23a361ca.tar drakx-backup-do-not-use-3bf40616e233d127ecc0c1f90edd740d23a361ca.tar.gz drakx-backup-do-not-use-3bf40616e233d127ecc0c1f90edd740d23a361ca.tar.bz2 drakx-backup-do-not-use-3bf40616e233d127ecc0c1f90edd740d23a361ca.tar.xz drakx-backup-do-not-use-3bf40616e233d127ecc0c1f90edd740d23a361ca.zip | |
use ldetect-lst
Diffstat (limited to 'perl-install/standalone/mousedrake')
| -rwxr-xr-x | perl-install/standalone/mousedrake | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/mousedrake b/perl-install/standalone/mousedrake index 397a1f12a..27bbc8f9a 100755 --- a/perl-install/standalone/mousedrake +++ b/perl-install/standalone/mousedrake @@ -4,6 +4,7 @@ use lib qw(/usr/lib/libDrakX); use common qw(:common :system); use interactive; +use detect_devices; use mouse; use c; require 'dumpvar.pl'; @@ -29,9 +30,8 @@ if (!$mouse || !$::auto) { $mouse = mouse::fullname2mouse($name); if ($mouse->{device} eq "usbmouse") { - require pci_probing::main; - my ($c) = pci_probing::main::probe("serial_usb") or die _("no serial_usb found\n"); - eval { modules::load($c->[1], "serial_usb") }; + my ($c) = grep { $_->{driver} =~ /usb-[ou]hci/ } detect_devices::pci_probe(0) or die _("no serial_usb found\n"); + eval { modules::load($c->{driver}, "serial_usb") }; } } $mouse->{XEMU3} = 'yes' if $mouse->{nbuttons} < 3 && (!$::noauto || $in->ask_yesorno('', _("Emulate third button?"), 1)); |