From 6b69393d2b0c2911f486ca6c0046ccf6e1a3f238 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 18 Aug 2000 05:44:25 +0000 Subject: no_comment --- perl-install/mouse.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/mouse.pm') diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 94741db34..30f3eaa31 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -172,12 +172,12 @@ sub detect() { eval { commands::modprobe("serial") }; my ($r, $wacom) = mouseconfig(); return ($r, $wacom) if $r; - if (detect_devices::probeUSB()) { + if (modules::get_alias("usb-interface")) { eval { modules::load("usbmouse"); modules::load("mousedev"); - }; - sleep(2); + sleep(2); + }; if (!$@ && detect_devices::tryOpen("usbmouse")) { $wacom or modules::unload("serial"); return name2mouse("USB Mouse"), $wacom; -- cgit v1.2.1