From 66f14d5895e94e97d100acece1b7df23a28cafc6 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Sun, 7 Nov 1999 13:45:46 +0000
Subject: *** empty log message ***

---
 perl-install/detect_devices.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index b8a1ff707..78930e6f8 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -219,7 +219,7 @@ sub hasModem($) {
 }
 
 sub hasMousePS2() {
-    my $t; sysread(tryOpen("psaux"), $t, 256) != 1 || $t ne "\xFE";
+    my $t; sysread(tryOpen("psaux") || return, $t, 256) != 1 || $t ne "\xFE";
 }
 
 #-######################################################################################
-- 
cgit v1.2.1