summaryrefslogtreecommitdiffstats
path: root/perl-install/mouse.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/mouse.pm')
-rw-r--r--perl-install/mouse.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 4521e359b..24acfb5b8 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -30,8 +30,9 @@ my %mice =
[ [ 'psaux' ],
[ [ 2, 'ps/2', 'PS/2', N_("Standard") ],
[ 5, 'ps/2', 'MouseManPlusPS/2', N_("Logitech MouseMan+") ],
- [ 5, 'imps2', 'auto', N_("Generic PS2 Wheel Mouse") ],
+ [ 5, 'imps2', 'IMPS/2', N_("Generic PS2 Wheel Mouse") ],
[ 5, 'ps/2', 'GlidePointPS/2', N_("GlidePoint") ],
+ [ 5, 'imps2', 'auto', N_("Automatic") ],
'',
[ 5, 'ps/2', 'ThinkingMousePS/2', N_("Kensington Thinking Mouse") ],
[ 5, 'netmouse', 'NetMousePS/2', N_("Genius NetMouse") ],
@@ -259,11 +260,11 @@ sub detect() {
my @wacom;
my $fast_mouse_probe = sub {
- my $auxmouse = detect_devices::hasMousePS2("psaux") && fullname2mouse("PS/2|Generic PS2 Wheel Mouse", unsafe => 0);
+ my $auxmouse = detect_devices::hasMousePS2("psaux") && fullname2mouse("PS/2|Automatic", unsafe => 0);
#- workaround for some special case were mouse is openable 1/2.
unless ($auxmouse) {
- $auxmouse = detect_devices::hasMousePS2("psaux") && fullname2mouse("PS/2|Generic PS2 Wheel Mouse", unsafe => 0);
+ $auxmouse = detect_devices::hasMousePS2("psaux") && fullname2mouse("PS/2|Automatic", unsafe => 0);
$auxmouse and detect_devices::hasMousePS2("psaux"); #- fake another open in order for XFree to see the mouse.
}