From fd4cc07cde0260835e479ed04bb65c48702567fe Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 29 Oct 2003 13:41:31 +0000
Subject: (getUPS) detect usb UPS (serial_probe not seeing them for now)

---
 perl-install/detect_devices.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'perl-install')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index a4b71308b..c37aecf8a 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -425,6 +425,10 @@ sub getNet() {
 #    mapgrep(sub {member (($_[0] =~ /\s*(\w*):/), @netdevices), $1 }, split(/\n/, cat_("/proc/net/dev")));
 #}
 
+sub getUPS() {
+    grep { $_->{description} =~ /Ellipse UPS/ } usb_probe()
+}
+
 $pcitable_addons = <<'EOF';
 # add here lines conforming the pcitable format (0xXXXX\t0xXXXX\t"\w+"\t".*")
 EOF
-- 
cgit v1.2.1