From 3b855af417a8c3bb917fee6026814594793eb627 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 17 Feb 2004 13:01:39 +0000 Subject: fix mouse detect() on kernel 2.4 --- perl-install/mouse.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/mouse.pm') diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 4ffcae23e..e4949913b 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -311,7 +311,9 @@ sub detect() { } else { log::l("no usb interface found for mice"); } - return { wacom => \@wacom, %$ps2_mouse }; + if ($ps2_mouse) { + return { wacom => \@wacom, %$ps2_mouse }; + } } #- probe serial device to make sure a wacom has been detected. -- cgit v1.2.1