diff options
| -rw-r--r-- | perl-install/mouse.pm | 7 |
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. } |