From 2f3a58e4d6f0cc9b7dd23e4f6af3973389c5d3b4 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Thu, 23 Jun 2016 14:40:04 +0200
Subject: log if were running under UEFI

---
 perl-install/install/NEWS   | 1 +
 perl-install/install/any.pm | 1 +
 2 files changed, 2 insertions(+)

(limited to 'perl-install/install')

diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 3a0b60d07..11880b9e8 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,5 +1,6 @@
 - logs:
   o fix found kernel names
+  o log if were running under UEFI
 - summary:
   o sort service categories, putting "Other" at end (mga#6286)
 
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index 92b3bcb2f..461cee94b 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -942,6 +942,7 @@ sub log_system_info {
     my ($o) = @_;
     log::l("second stage install running (", drakx_version($o), ")");
     log::l(sprintf("Virtualization=%s", detect_devices::virt_technology()));
+    log::l(sprintf("Is UEFI=%s", bool2yesno(is_uefi())));
 }
 
 
-- 
cgit v1.2.1