diff options
Diffstat (limited to 'perl-install/fsedit.pm')
| -rw-r--r-- | perl-install/fsedit.pm | 2 |
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; |