diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-09-10 15:53:29 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-09-10 15:53:29 +0000 |
| commit | 6cb5dd30efab27e03a47cc0261d087b6e8eedcf5 (patch) | |
| tree | e9cbfbf24f58e21f09cfdfa91f56327e574dc61e /perl-install/mouse.pm | |
| parent | e4c930e80874953293979f3d91ebd93551bf821c (diff) | |
| download | drakx-6cb5dd30efab27e03a47cc0261d087b6e8eedcf5.tar drakx-6cb5dd30efab27e03a47cc0261d087b6e8eedcf5.tar.gz drakx-6cb5dd30efab27e03a47cc0261d087b6e8eedcf5.tar.bz2 drakx-6cb5dd30efab27e03a47cc0261d087b6e8eedcf5.tar.xz drakx-6cb5dd30efab27e03a47cc0261d087b6e8eedcf5.zip | |
added hid type usb mouse support.
Diffstat (limited to 'perl-install/mouse.pm')
| -rw-r--r-- | perl-install/mouse.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 07130be50..6d80964b4 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -261,13 +261,13 @@ sub detect() { if (modules::get_alias("usb-interface")) { if (my (@l) = detect_devices::usbMice()) { log::l("found usb mouse $_->{driver} $_->{description} ($_->{type})") foreach @l; - eval { modules::load("usbmouse"); modules::load("mousedev"); }; + eval { modules::load($_) foreach qw(hid mousedev usbmouse) }; if (!$@ && detect_devices::tryOpen("usbmouse")) { my $mouse = fullname2mouse($l[0]{driver} =~ /Mouse:(.*)/ ? $1 : "USB|Generic"); $auxmouse and $mouse->{auxmouse} = $auxmouse; #- for laptop, we kept the PS/2 as secondary (symbolic). return $mouse; } - eval { modules::unload("mousedev"); modules::unload("usbmouse"); }; + eval { modules::unload($_) foreach qw(usbmouse mousedev hid) }; } } $auxmouse; |