From 73c30d928f6b53b727f92455c66c7aa83405b910 Mon Sep 17 00:00:00 2001
From: Thomas Backlund <tmb@mageia.org>
Date: Thu, 8 Jan 2015 20:26:51 +0159
Subject: add is_mgalive() and is_uefi() checks

---
 perl-install/common.pm | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'perl-install/common.pm')

diff --git a/perl-install/common.pm b/perl-install/common.pm
index c8ad7a2a6..b42ac8386 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -711,6 +711,12 @@ sub update_gnomekderc_no_create {
     }
 }
 
+# check if we are in mga live mode
+sub is_mgalive { -e "/run/mgalive" }
+
+# check if we are on an uefi system
+sub is_uefi { -e "/sys/firmware/efi" }
+
 =item cmp_kernel_versions($va, $vb)
 
 Compare two kernel versions
-- 
cgit v1.2.1