From 370afa2d112d4aa35cc47f9d8418737b339982cd Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 5 Apr 2012 17:37:21 +0000
Subject: do not set security level to its own value on upgrade (mga#5147)

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

(limited to 'perl-install/install')

diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index cd994fcf3..c93f090a8 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,4 +1,5 @@
 - log install settings (mga#3467 & mga#5209)
+- do not set security level to its own value on upgrade (mga#5147)
 
 Version 14.1 - 23 March 2012
 
diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index c9d2dde5c..53e87f0c3 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -813,7 +813,7 @@ sub miscellaneousAfter {
     addToBeDone {
 	addVarsInSh("$::prefix/etc/sysconfig/system", { META_CLASS => $o->{meta_class} });
 
-	eval { install::any::set_security($o) };
+	eval { install::any::set_security($o) } if !$o->{isUpgrade};
 
     } 'installPackages';
 }
-- 
cgit v1.2.1