diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/harddrake/data.pm | 6 |
1 files changed, 5 insertions, 1 deletions
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, }, |