diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2007-08-21 14:49:12 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2007-08-21 14:49:12 +0000 |
| commit | 7c377cbe86f3b23cbff853381c30cb410fab2b26 (patch) | |
| tree | 2f89deaa01014a523d1a7c423ea782bfa2108d2b /perl-install | |
| parent | 6afc63f173fc2ea3c51e8a88ccb28bc96b554f6e (diff) | |
| download | drakx-7c377cbe86f3b23cbff853381c30cb410fab2b26.tar drakx-7c377cbe86f3b23cbff853381c30cb410fab2b26.tar.gz drakx-7c377cbe86f3b23cbff853381c30cb410fab2b26.tar.bz2 drakx-7c377cbe86f3b23cbff853381c30cb410fab2b26.tar.xz drakx-7c377cbe86f3b23cbff853381c30cb410fab2b26.zip | |
- diskdrake:
o write mdadm.conf when it is modified (#32360)
(a nicer fix would be to write it when needed, not so soon, but it's harder)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 4 | ||||
| -rw-r--r-- | perl-install/diskdrake/interactive.pm | 2 | ||||
| -rw-r--r-- | perl-install/raid.pm | 2 |
3 files changed, 8 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index e130ab054..f1cc2f705 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,7 @@ +- diskdrake: + o write mdadm.conf when it is modified (#32360) + (a nicer fix would be to write it when needed, not so soon, but it's harder) + Version 10.4.172 - 21 August 2007, by Olivier "blino" Blin - ignore wmaster* devices when detecting wireless interfaces diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index aac735029..9f3413dae 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -845,6 +845,7 @@ sub Add2RAID { if (ref($md_part)) { raid::add($md_part, $part); + raid::write_conf($raids) if $::isStandalone; } else { raid::check_prog($in) or return; my $md_part = raid::new($raids, disks => [ $part ]); @@ -1048,6 +1049,7 @@ sub modifyRAID { ) or return; raid::change_device($md_part, $new_device); raid::updateSize($md_part); # changing the raid level changes the size available + raid::write_conf($raids) if $::isStandalone; 1; } diff --git a/perl-install/raid.pm b/perl-install/raid.pm index 135218344..0475b68ef 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -53,6 +53,7 @@ sub delete { inactivate_and_dirty($md_part); delete $_->{raid} foreach @{$md_part->{disks}}; @$raids = grep { $_ != $md_part } @$raids; + write_conf($raids) if $::isStandalone; } sub change_device { @@ -77,6 +78,7 @@ sub removeDisk { } else { @$raids = grep { $_ != $md_part } @$raids; } + write_conf($raids) if $::isStandalone; } sub updateSize { |