diff options
| -rw-r--r-- | perl-install/detect_devices.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 099b9ca45..2dc3e633a 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -581,7 +581,7 @@ sub getUPS() { $_; } grep { $_->{DESCRIPTION} =~ /MGE UPS/ } values %serialprobe), # USB UPSs; - (grep { $->{description} =~ /American Power Conversion\|Back-UPS/ } @usb_devices), + (grep { $_->{description} =~ /American Power Conversion\|Back-UPS/ } @usb_devices), (map { ($_->{name} = $_->{description}) =~ s/.*\|//; $_->{port} = "/dev/"; # FIXME |