From 41f57ce4ae9e9c686d20525c8aa8574f5c7b4a88 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 6 Oct 2004 02:26:03 +0000
Subject: (getUPS) fix detecting UPS devices

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

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index c2560006c..2f3909af5 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -570,7 +570,7 @@ sub getNet() {
 
 sub getUPS() {
     # MGE serial PnP devices:
-    my @usb_devices = map { ($_->{name} = $_->{description}) =~ s/.*\|// } usb_probe();
+    my @usb_devices = map { ($_->{name} = $_->{description}) =~ s/.*\|//; $_ } usb_probe();
 
     (map {
         $_->{port} = $_->{DEVICE};
-- 
cgit v1.2.1