From 9d0f3580bd0a332740af3e69ea7d93647916705b Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 5 Apr 2012 17:37:24 +0000
Subject: do not crash if msec isn't installed

---
 perl-install/install/any.pm | 1 +
 1 file changed, 1 insertion(+)

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

diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index 8cd9159d5..957b57f30 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -1302,6 +1302,7 @@ sub disable_user_view() {
 sub set_security {
     my ($o) = @_;
     require security::various;
+    return if !-x "$::prefix/usr/sbin/msec";
     security::level::set($o->{security});
     security::various::config_security_user($::prefix, $o->{security_user});
 }
-- 
cgit v1.2.1