summaryrefslogtreecommitdiffstats
path: root/perl-install/mouse.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-09 14:26:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-09 14:26:19 +0000
commit6620f83644457de5fee96609ae235e85d9c3591e (patch)
tree26e1c3619f626217cadf4ebba3febad55968c3df /perl-install/mouse.pm
parent8939b9298a3ec7fa5e5b137502124d4fff56f2ca (diff)
downloaddrakx-6620f83644457de5fee96609ae235e85d9c3591e.tar
drakx-6620f83644457de5fee96609ae235e85d9c3591e.tar.gz
drakx-6620f83644457de5fee96609ae235e85d9c3591e.tar.bz2
drakx-6620f83644457de5fee96609ae235e85d9c3591e.tar.xz
drakx-6620f83644457de5fee96609ae235e85d9c3591e.zip
write "MOVE YOUR WHEEL!" only for ps2 mice
Diffstat (limited to 'perl-install/mouse.pm')
-rw-r--r--perl-install/mouse.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index fdee6e1cd..70d891141 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -474,7 +474,7 @@ sub test_mouse {
$draw_by_name->('mouse');
if ($::isInstall || 1) {
$draw_text->(N("Please test the mouse"), 200);
- if ($b_x_protocol_changed && $mouse->{nbuttons} > 3 && member($mouse->{XMOUSETYPE}, 'IMPS/2', 'ExplorerPS/2')) {
+ if ($b_x_protocol_changed && $mouse->{nbuttons} > 3 && $mouse->{device} eq 'psaux' && member($mouse->{XMOUSETYPE}, 'IMPS/2', 'ExplorerPS/2')) {
$draw_text->(N("To activate the mouse,"), 240);
$draw_text->(N("MOVE YOUR WHEEL!"), 260);
}