diff options
-rw-r--r-- | perl-install/mouse.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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); } |