summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/mouse.pm5
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 48aa6fc51..106e8c3cd 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -312,14 +312,11 @@ sub detect() {
#- probe serial device to make sure a wacom has been detected.
eval { modules::load("serial") };
my ($r, @serial_wacom) = mouseconfig(); push @wacom, @serial_wacom;
+ $r and return { wacom => \@wacom, %$r };
if (!$::isStandalone) {
my $mouse = $fast_mouse_probe->();
- $r && $mouse and $r->{auxmouse} = $mouse; #- we kept the auxilliary mouse as PS/2.
- $r and return { wacom => \@wacom, %$r };
$mouse and return { wacom => \@wacom, %$mouse };
- } else {
- $r and return { wacom => \@wacom, %$r };
}
#- in case only a wacom has been found, assume an inexistant mouse (necessary).