diff options
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/service_harddrake | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index e0957938d..347c7cd60 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -31,8 +31,8 @@ my (%config, $in); # For each hw, class, detect device, compare and offer to reconfigure if # needed foreach (@harddrake::data::tree) { - my ($Ident, $item, undef, $configurator, $detector) = @$_; - + my ($Ident, $item, undef, $configurator, $detector, $do_it) = @$_; + next unless $do_it; # No detector ? (should never happen but who know ?) ref($detector) eq 'CODE' or next; |