diff options
Diffstat (limited to 'perl-install/raid.pm')
| -rw-r--r-- | perl-install/raid.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/raid.pm b/perl-install/raid.pm index 5f779a444..2c1c86e53 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -235,11 +235,13 @@ sub get_existing { } } split(',', $raw_part->{devices}); + my ($info) = $md =~ m!([^/]*)$!; my $md_part = new($raids, device => $md, UUID => $raw_part->{UUID}, level => $raw_part->{level}, metadata => $raw_part->{metadata}, + info => $info . " (RAID$raw_part->{level})", disks => \@mdparts); my $type = fs::type::type_subpart_from_magic($md_part); |