From 4b4a309611e8b1ef4fd34a6fbf7a9b03bf77db3b Mon Sep 17 00:00:00 2001 From: Frederic Lepied Date: Tue, 31 Aug 2004 09:41:54 +0000 Subject: added initial support for UPS --- perl-install/harddrake/data.pm | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) (limited to 'perl-install/harddrake') diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index fd9ed785d..cfc9ea623 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -12,7 +12,7 @@ my @devices = detect_devices::probeall(); # Update me each time you handle one more devices class (aka configurator) sub unknown() { - grep { $_->{media_type} !~ /BRIDGE|class\|Mouse|DISPLAY|Hub|MEMORY_RAM|MULTIMEDIA_(VIDEO|AUDIO|OTHER)|NETWORK|Printer|SERIAL_(USB|SMBUS)|STORAGE_(IDE|OTHER|SCSI)|tape/ + grep { $_->{media_type} !~ /BRIDGE|class\|Mouse|DISPLAY|Hub|MEMORY_RAM|MULTIMEDIA_(VIDEO|AUDIO|OTHER)|NETWORK|Printer|SERIAL_(USB|SMBUS)|STORAGE_(IDE|OTHER|SCSI)|tape|UPS/ && !member($_->{driver}, qw(cpia_usb cyber2000fb forcedeth ibmcam megaraid mod_quickcam nvnet ohci1394 ov511 ov518_decomp scanner ultracam usbvideo usbvision)) && $_->{driver} !~ /^ISDN|Mouse:USB|Removable:zip|class\|Mouse|sata|www.linmodems.org/ && $_->{type} ne 'network' @@ -367,7 +367,16 @@ our @tree = require scanner; f(scanner::detect()) }, checked_on_boot => 0, }, - + + { + class => "UPS", + string => N("UPS"), + icon => "harddisk.png", + configurator => "$sbindir/drakups", + detector => sub { detect_devices::getUPS() }, + checked_on_boot => 0, + }, + { class => "UNKNOWN", string => N("Unknown/Others"), -- cgit v1.2.1