diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-10-05 16:39:16 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-10-05 16:39:16 +0000 |
| commit | b44aa967c224f71abce9cba7db6a899c097cc572 (patch) | |
| tree | 178eb1de3bf6e6a78ff574e56d725c4c8138a06f /perl-install | |
| parent | 8e7a932ca210c00801c9466791ca3882a5d10d51 (diff) | |
| download | drakx-b44aa967c224f71abce9cba7db6a899c097cc572.tar drakx-b44aa967c224f71abce9cba7db6a899c097cc572.tar.gz drakx-b44aa967c224f71abce9cba7db6a899c097cc572.tar.bz2 drakx-b44aa967c224f71abce9cba7db6a899c097cc572.tar.xz drakx-b44aa967c224f71abce9cba7db6a899c097cc572.zip | |
(main,hasCPUMicrocode) load 'microcode' asynchronously
thus preventing big wait when not supported (mga#7671)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/detect_devices.pm | 1 | ||||
| -rw-r--r-- | perl-install/install/NEWS | 3 | ||||
| -rw-r--r-- | perl-install/install/install2.pm | 2 |
3 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 9547d8a9a..6ba852fec 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -1241,7 +1241,6 @@ sub matching_types() { sub hasCPUMicrocode() { state $hasCPUMicrocode; if (!defined $hasCPUMicrocode) { - eval { modules::load('microcode') }; $hasCPUMicrocode = to_bool(find { 'microcode' } modules::loaded_modules()); } return $hasCPUMicrocode; diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 39d22cf2d..27e906a0c 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,6 @@ +- load 'microcode' asynchronously, preventing big wait when not supported + (mga#7671) + Version 14.46.2 - 3 October 2012 - adapt to latest dash-static diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm index 24d99cb03..6717a089e 100644 --- a/perl-install/install/install2.pm +++ b/perl-install/install/install2.pm @@ -613,6 +613,8 @@ sub main { init_local_install($o); } else { start_udev(); + # load some modules early but asynchronously: + run_program::raw({ detach => 1 }, 'modprobe', 'microcode'); } $o->{prefix} = $::prefix = $::testing ? "/tmp/test-perl-install" : "/mnt"; |