adapt to fs/dmraid.pm change (bus is now dmraid_xxx instead of dm_xxx)

1 files changed, 1 insertions, 1 deletions

diff --git a/perl-install/fs/proc_partitions.pm b/perl-install/fs/proc_partitions.pm
index 1d40840f5..90cd2fa7b 100644
--- a/perl-install/fs/proc_partitions.pm
+++ b/perl-install/fs/proc_partitions.pm
@@ -59,7 +59,7 @@ sub read {
 sub compare {
     my ($hd) = @_;
 
-    $hd->{bus} =~ /^dm_/ and log::l("skipping /proc/partititions check for dmraid $hd->{device}"), return;
+    $hd->{bus} =~ /^dmraid_/ and log::l("skipping /proc/partititions check for dmraid $hd->{device}"), return;
 
     my @l1 = partition_table::get_normal_parts($hd);
     my @l2 = grep { $_->{rootDevice} eq $hd->{device} } &read([$hd]);