From 5510055af8bca3dac0df8490b0337fab5af43e84 Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Tue, 14 Apr 2009 16:24:03 +0000 Subject: handle md devices not called md\d+, like md_d127 --- perl-install/NEWS | 3 +++ perl-install/raid.pm | 4 ++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/perl-install/NEWS b/perl-install/NEWS index 28be0c22c..6b021dadc 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- diskdrake: + o handle md devices not called md\d+, like md_d127 + Version 12.27 - 14 April 2009 - diskdrake: diff --git a/perl-install/raid.pm b/perl-install/raid.pm index 79476e956..5252511a0 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -165,10 +165,10 @@ sub inactivate_and_dirty { } sub active_mds() { - map { if_(/^(md\d+)\s*:\s*active/, $1) } cat_("/proc/mdstat"); + map { if_(/^(md\S+)\s*:\s*active/, $1) } cat_("/proc/mdstat"); } sub inactive_mds() { - map { if_(/^(md\d+)\s*:\s*inactive/, $1) } cat_("/proc/mdstat"); + map { if_(/^(md\S+)\s*:\s*inactive/, $1) } cat_("/proc/mdstat"); } sub free_mds { -- cgit v1.2.1