diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-08-18 20:22:16 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-08-18 20:22:16 +0000 |
| commit | 9720badd53b62a5296a858c84bd2e5cb63dfd290 (patch) | |
| tree | 9c9ad7c8ca1a3fd37d5762eb5023299287352b2e /perl-install/raid.pm | |
| parent | 3ed2a748cd61ac9472dde801f06cc137decfa727 (diff) | |
| download | drakx-9720badd53b62a5296a858c84bd2e5cb63dfd290.tar drakx-9720badd53b62a5296a858c84bd2e5cb63dfd290.tar.gz drakx-9720badd53b62a5296a858c84bd2e5cb63dfd290.tar.bz2 drakx-9720badd53b62a5296a858c84bd2e5cb63dfd290.tar.xz drakx-9720badd53b62a5296a858c84bd2e5cb63dfd290.zip | |
update the raid size as it should be
Diffstat (limited to 'perl-install/raid.pm')
| -rw-r--r-- | perl-install/raid.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/raid.pm b/perl-install/raid.pm index c59e7f691..2732beb34 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -22,11 +22,12 @@ sub nb { sub new { my ($raids, @parts) = @_; my $nb = @$raids; - $raids->[$nb] = { 'chunk-size' => "64k", type => 0x83, disks => [ @parts ], device => "md$nb", notFormatted => 1 }; + $raids->[$nb] = { 'chunk-size' => "64k", type => 0x83, disks => [ @parts ], device => "md$nb", notFormatted => 1, level => 1 }; foreach my $part (@parts) { $part->{raid} = $nb; delete $part->{mntpoint}; } + update($raids->[$nb]); $nb; } @@ -36,6 +37,7 @@ sub add { $part->{raid} = $nb; delete $part->{mntpoint}; push @{$raids->[$nb]{disks}}, $part; + update($raids->[$nb]); } sub delete { |