summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/mouse.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index e9f3df1c5..babaa31f0 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -310,11 +310,7 @@ sub detect() {
}
#- in case only a wacom has been found, assume an inexistant mouse (necessary).
- @wacom and return { CLASS => 'MOUSE',
- nbuttons => 2,
- device => "nothing",
- MOUSETYPE => "Microsoft",
- XMOUSETYPE => "Microsoft", wacom => \@wacom };
+ @wacom and return fullname2mouse('none|No mouse', wacom => \@wacom);
if (detect_devices::is_a_recent_computer() && $::isInstall) {
#- special case for non detected usb interface on a box with no mouse.