summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-20 16:25:58 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-20 16:25:58 +0000
commit7d16cd1fa4774de3bb8bb04c3c0d155321484a2b (patch)
tree68f6bee66270b91d03ac19512dd64e261dc98531 /perl-install
parenteb8b0c76376bea97b3c9d7b69758b437efac4581 (diff)
downloaddrakx-7d16cd1fa4774de3bb8bb04c3c0d155321484a2b.tar
drakx-7d16cd1fa4774de3bb8bb04c3c0d155321484a2b.tar.gz
drakx-7d16cd1fa4774de3bb8bb04c3c0d155321484a2b.tar.bz2
drakx-7d16cd1fa4774de3bb8bb04c3c0d155321484a2b.tar.xz
drakx-7d16cd1fa4774de3bb8bb04c3c0d155321484a2b.zip
try a stronger matching technique for parsing /proc/mdstat with devfs
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fsedit.pm2
1 files changed, 1 insertions, 1 deletions
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;