summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/NEWS4
-rw-r--r--perl-install/diskdrake/interactive.pm2
-rw-r--r--perl-install/raid.pm2
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 {