From 3cfae94281e8223720012bbfd00d1a8685b48104 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Mon, 15 Sep 2008 08:04:25 +0000
Subject: fix check for mdadm in live install (#43785)

---
 perl-install/NEWS    | 3 +++
 perl-install/raid.pm | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 0308dd013..fee8fc284 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,6 @@
+- diskdrake:
+  o fix check for mdadm in live install (#43785)
+
 Version 11.41 - 11 September 2008
 
 - fix default spacing between GUI elements
diff --git a/perl-install/raid.pm b/perl-install/raid.pm
index 220d4d1ce..26da102b7 100644
--- a/perl-install/raid.pm
+++ b/perl-install/raid.pm
@@ -17,7 +17,7 @@ sub max_nb() { 31 }
 
 sub check_prog {
     my ($in) = @_;
-    $::isInstall || $in->do_pkgs->ensure_binary_is_installed('mdadm', 'mdadm');
+    whereis_binary('mdadm') || $in->do_pkgs->ensure_binary_is_installed('mdadm', 'mdadm');
 }
 
 sub new {
-- 
cgit v1.2.1