diff options
Diffstat (limited to 'perl-install/mouse.pm')
| -rw-r--r-- | perl-install/mouse.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 578765f7b..94741db34 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -178,12 +178,9 @@ sub detect() { modules::load("mousedev"); }; sleep(2); - if (!$@) { - my $dev; - $dev ||= "usbmouse" if detect_devices::tryOpen("usbmouse"); - $dev ||= "usbmice" if detect_devices::tryOpen("usbmice"); + if (!$@ && detect_devices::tryOpen("usbmouse")) { $wacom or modules::unload("serial"); - return add2hash({ device => $dev }, name2mouse("USB Mouse")), $wacom; + return name2mouse("USB Mouse"), $wacom; } modules::unload("mousedev"); modules::unload("usbmouse"); |