From 5aeee52087bef62b1257c82a72ef0c930899a2fb Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@mandriva.org>
Date: Mon, 24 May 2010 14:12:09 +0000
Subject: load raid metadata version

---
 perl-install/NEWS    | 1 +
 perl-install/raid.pm | 7 ++++++-
 2 files changed, 7 insertions(+), 1 deletion(-)

(limited to 'perl-install')

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) {
-- 
cgit v1.2.1