From 7e2d5f1447ad5e269ce8f5eab4a8b8ade7e96f85 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 7 Mar 2016 10:25:32 +0100
Subject: prevent slow boot on first boot (mga#16684)

---
 perl-install/install/NEWS     | 2 ++
 perl-install/install/steps.pm | 8 ++++++++
 2 files changed, 10 insertions(+)

diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 7825d0335..b19c25f89 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- prevent slow boot on first boot (mga#16684)
+
 Version 17.19 - 24 February 2016
 
 - detect nvme devices as block devices (mga#17743)
diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index 35aa93f9b..a58b70b7c 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -485,6 +485,14 @@ Consoles 1,3,4,7 may also contain interesting information";
     harddrake::autoconf::cpufreq();
     harddrake::autoconf::floppy();
 
+    # prevent slow boot on first boot:
+    my $cfg_file = "$::prefix/etc/sysconfig/harddrake2/kernel";
+    if (-f $cfg_file) {
+	my %kernel_config = getVarsFromSh($cfg_file);
+	$kernel_config{IS_LAPTOP} = bool2text(detect_devices::isLaptop());
+	setVarsInSh($cfg_file, \%kernel_config);
+    }
+
     #- for mandrake_firstime
     touch "$::prefix/var/lock/TMP_1ST";
 
-- 
cgit v1.2.1