From b6be4e77cde57ffc7a5f8ad717a16483758ee1e9 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 12 Feb 2004 10:17:17 +0000
Subject: cleanup

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

(limited to 'perl-install/mouse.pm')

diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index a573c9c65..c1bbf7011 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -258,7 +258,6 @@ sub detect() {
 			      "busmouse|1 button");
     }
 
-    my @wacom;
     my $fast_mouse_probe = sub {
 	my $auxmouse = detect_devices::hasMousePS2("psaux") && fullname2mouse("PS/2|Automatic", unsafe => 0);
 
@@ -286,6 +285,7 @@ sub detect() {
 	$auxmouse;
     };
 
+    my @wacom;
     if (modules::get_probeall("usb-interface")) {
 	if (my (@l) = detect_devices::usbWacom()) {
 	    log::l("found usb wacom $_->{driver} $_->{description} ($_->{type})") foreach @l;
-- 
cgit v1.2.1