From ea522642b95780da50a6ae1a3de8d6e064954a90 Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Mon, 19 Oct 2009 10:28:14 +0000 Subject: fix raid initialisation during install (#54706) --- perl-install/diskdrake/interactive.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/diskdrake') 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); -- cgit v1.2.1