From 0e8b0439a9b3394049065f53c643f5b446e4a419 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 24 Jun 2005 09:36:28 +0000 Subject: handle dmraid device not there, keeping the raw hds --- perl-install/fsedit.pm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 404376258..2b5a81cf0 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -107,16 +107,13 @@ sub handle_dmraid { eval { require fs::dmraid; 1 } or return; - my @pvs = fs::dmraid::pvs(); my @vgs = fs::dmraid::vgs(); - log::l(sprintf('dmraid: pvs = [%s], vgs = [%s]', - join(' ', @pvs), - join(' ', map { $_->{device} } @vgs))); + log::l(sprintf('dmraid: ' . join(' ', map { "$_->{device} [" . join(' ', @{$_->{disks}}) . "]" } @vgs))); my @used_hds = map { my $part = fs::get::device2part($_, $drives) or log::l("handle_dmraid: can't find $_ in known drives"); if_($part, $part); - } @pvs; + } map { @{$_->{disks}} } @vgs; @$drives = difference2($drives, \@used_hds); -- cgit v1.2.1