From 44f9f7b494dbe0cc539bfcd24c7cee9f2065cba6 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 30 Mar 2005 10:18:29 +0000
Subject: ensure we detect all known SATA controllers

---
 perl-install/harddrake/data.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 1368e5dba..620f6a082 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -295,7 +295,11 @@ our @tree =
       string => N("SATA controllers"),
       icon => "ide_hd.png",
       configurator => "",
-      detector => sub { f(grep { $_->{driver} =~ /^sata/ } @devices) },
+      detector => sub { 
+          require list_modules;
+          my @modules = list_modules::category2modules('disk/sata');
+          f(grep { member($_->{driver}, @modules) } @devices);
+      },
       checked_on_boot => 1,
      },
 
-- 
cgit v1.2.1