From 7d16cd1fa4774de3bb8bb04c3c0d155321484a2b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 20 Aug 2001 16:25:58 +0000 Subject: try a stronger matching technique for parsing /proc/mdstat with devfs --- perl-install/fsedit.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 7251913c6..2c98bbd92 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -144,7 +144,7 @@ sub hds { my $chunks = $mdstat[$i+1] =~ /([^ ]+) chunks/ ? $1 : "64k"; my @disks; foreach my $part (@parts) { - if (grep /$part->{device}/, @thisparts) { + if (grep { readlink("/dev/$part->{device}") eq $_ || $part->{device} eq $_ } @thisparts) { $part->{raid} = $nb; delete $part->{mntpoint}; push @disks, $part; -- cgit v1.2.1