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 3de4cb781..a4d74e7a3 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); } - foreach ($mouse->{wacom}) { + for (@{$mouse->{wacom}}) { /ttyS/ and push @l, qw(serial); /event/ and push @l, qw(wacom evdev); } |