From b702e1e4814dd994c2094d72b5acbdf5e2b4d796 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 1 Jul 2005 06:58:54 +0000 Subject: use fs::type::is_dmraid() --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 31163a31d..ab8091db5 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -849,7 +849,7 @@ sub default_packages { push @l, "numlock" if $o->{miscellaneous}{numlock}; push @l, "mdadm" if !is_empty_array_ref($o->{all_hds}{raids}); push @l, "lvm2" if !is_empty_array_ref($o->{all_hds}{lvms}); - push @l, "dmraid" if any { $_->{bus} =~ /^dmraid_/ } @{$o->{all_hds}{hds}}; + push @l, "dmraid" if any { fs::type::is_dmraid($_) } @{$o->{all_hds}{hds}}; push @l, "alsa", "alsa-utils" if any { $o->{modules_conf}->get_alias("sound-slot-$_") =~ /^snd-/ } 0 .. 4; push @l, detect_devices::probe_name('Pkg'); -- cgit v1.2.1