From b44aa967c224f71abce9cba7db6a899c097cc572 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 5 Oct 2012 16:39:16 +0000
Subject: (main,hasCPUMicrocode) load 'microcode' asynchronously

thus preventing big wait when not supported (mga#7671)
---
 perl-install/install/NEWS        | 3 +++
 perl-install/install/install2.pm | 2 ++
 2 files changed, 5 insertions(+)

(limited to 'perl-install/install')

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";
-- 
cgit v1.2.1