From 044bc092c899ed7d04dc18ade013177b7902aa98 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 10 Sep 2003 14:30:50 +0000
Subject: fixed the fix of fpons trick...

---
 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 a4d74e7a3..6a573ace7 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -333,7 +333,7 @@ sub load_modules {
 	/serial/ and @l = qw(serial);
 	/USB/    and @l = qw(hid mousedev usbmouse);
     }
-    for (@{$mouse->{wacom}}) {
+    foreach (@{$mouse->{wacom}}) {
 	/ttyS/   and push @l, qw(serial);
 	/event/  and push @l, qw(wacom evdev);
     }
-- 
cgit v1.2.1