diff options
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/raid.pm | 7 |
3 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 038a8da57..2723f05d7 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,4 +1,5 @@ - fix raid initialisation during install (#54706) +- fix raid detection during install (#54706) Version 12.67 - 18 October 2009 diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 3a49ab92c..61713f637 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - fix raid initialisation during install (#54706) +- fix raid detection during install (#54706) Version 12.67 - 18 October 2009 diff --git a/perl-install/raid.pm b/perl-install/raid.pm index 93ec9748e..11284a90a 100644 --- a/perl-install/raid.pm +++ b/perl-install/raid.pm @@ -182,6 +182,9 @@ sub free_mds { sub detect_during_install { my (@parts) = @_; + foreach (@{allmodules()}) { + eval { modules::load($_) }; + } detect_during_install_once(@parts); detect_during_install_once(@parts) if active_mds(); #- try again to detect RAID 10 @@ -198,10 +201,6 @@ sub detect_during_install_once { (map { "/dev/$_" } active_mds()), map { devices::make($_->{device}) } @parts), "\n"); run_program::run('mdadm', '>>', '/etc/mdadm.conf', '--examine', '--scan'); - - foreach (@{allmodules()}) { - eval { modules::load(module($_)) }; - } run_program::run('mdadm', '--assemble', '--scan'); } |