From ea522642b95780da50a6ae1a3de8d6e064954a90 Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@mandriva.org>
Date: Mon, 19 Oct 2009 10:28:14 +0000
Subject: fix raid initialisation during install (#54706)

---
 perl-install/NEWS                     | 2 ++
 perl-install/diskdrake/interactive.pm | 4 +++-
 perl-install/install/NEWS             | 2 ++
 3 files changed, 7 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 117a256fe..038a8da57 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- fix raid initialisation during install (#54706)
+
 Version 12.67 - 18 October 2009
 
 - service_harddrake: allow to force screen resolution using
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 4eef7b003..0948c9a0c 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -285,7 +285,9 @@ sub Done {
 	    return if !$::isStandalone;
 	    $in->ask_yesorno(N("Quit without saving"), N("Quit without writing the partition table?"), 1) or return;
 	}
-        raid::make($all_hds->{raids}, $_) if isRAID($_);
+    }
+    foreach (@{$all_hds->{raids}}) {
+        raid::make($all_hds->{raids}, $_);
     }
     if (!$::isInstall) {
 	my $new = fs::fstab_to_string($all_hds);
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 95645dd2c..3a49ab92c 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- fix raid initialisation during install (#54706)
+
 Version 12.67 - 18 October 2009
 
 - partitioning wizard:
-- 
cgit v1.2.1