summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS1
-rw-r--r--perl-install/raid.pm7
2 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 9bf8b16ef..5fb297038 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -2,6 +2,7 @@
window on top of everything (doesn't work on the Ones), use
any::set_wm_hints_if_needed instead (#59155)
- allow forcing raid metadata version
+- load raid metadata version
- fix detection of /var partition
Version 13.28 - 19 May 2010
diff --git a/perl-install/raid.pm b/perl-install/raid.pm
index d9cb6a83d..a70b841fd 100644
--- a/perl-install/raid.pm
+++ b/perl-install/raid.pm
@@ -226,7 +226,12 @@ sub get_existing {
}
} split(',', $raw_part->{devices});
- my $md_part = new($raids, device => $md, UUID => $raw_part->{UUID}, level => $raw_part->{level}, disks => \@mdparts);
+ my $md_part = new($raids,
+ device => $md,
+ UUID => $raw_part->{UUID},
+ level => $raw_part->{level},
+ metadata => $raw_part->{metadata},
+ disks => \@mdparts);
my $type = fs::type::type_subpart_from_magic($md_part);
if ($type) {