From 76146269a480fe664fc4a3280dd78c9070496b06 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 29 Jan 2003 01:14:41 +0000
Subject: software raid (mdX) can go up to md31

---
 perl-install/raid.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install/raid.pm')

diff --git a/perl-install/raid.pm b/perl-install/raid.pm
index ab6fa0fcb..c59bc3021 100644
--- a/perl-install/raid.pm
+++ b/perl-install/raid.pm
@@ -13,6 +13,8 @@ use devices;
 use modules;
 use fs;
 
+sub max_nb { 31 }
+
 sub nb { 
     my ($nb) = @_;
     first((ref $nb ? $nb->{device} : $nb) =~ /(\d+)/);
@@ -177,6 +179,6 @@ sub is_active {
     cat_("/proc/mdstat") =~ /^$dev /m;
 }
 
-sub inactivate_all() { run_program::run("raidstop", devices::make("md$_")) foreach 0..7 }
+sub inactivate_all() { run_program::run("raidstop", devices::make("md$_")) foreach 0..max_nb() }
 
 1;
-- 
cgit v1.2.1