From 97c7fd33d60103086d91d8c88e08fb902de45e29 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 24 Mar 2005 11:57:17 +0000 Subject: calling inactivate_and_dirty() on a new structure is bad, we loose the {isFormatted} flag (no big deal though, it happened because raid::new() was creating a new raid with an already active md name) --- perl-install/raid.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'perl-install/raid.pm') diff --git a/perl-install/raid.pm b/perl-install/raid.pm index d52956935..3b66c8c08 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -56,10 +56,11 @@ sub delete { } sub change_device { - my ($md_part, $prev_device) = @_; - if ($prev_device ne $md_part->{device}) { - inactivate_and_dirty({ device => $prev_device }); - $_->{raid} = $md_part->{device} foreach @{$md_part->{disks}}; + my ($md_part, $new_device) = @_; + if ($new_device ne $md_part->{device}) { + inactivate_and_dirty($md_part); + $md_part->{device} = $new_device; + $_->{raid} = $new_device foreach @{$md_part->{disks}}; } } -- cgit v1.2.1