summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS3
-rw-r--r--perl-install/authentication.pm8
-rw-r--r--perl-install/install/NEWS2
3 files changed, 8 insertions, 5 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 2db7e86bf..246a0cc25 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,4 +1,5 @@
-
+- authentication:
+ o reduced password weakness check level
- draksound:
o Fix soundprofile alternatives setting by using a more appropriate subroutine
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm
index 34cb12e9d..452a0667a 100644
--- a/perl-install/authentication.pm
+++ b/perl-install/authentication.pm
@@ -991,10 +991,10 @@ sub configure_nss_ldap {
$score += 2 if $password =~ /([a-z].*[A-Z])|([A-Z].*[a-z])/;
$score += 2 if $password =~ /([a-zA-Z0-9].*[!@#$%^&*?_~])|([!@#$%^&*?_~,].*[a-zA-Z0-9])/;
- my $level = $score < 16 ? 1 :
- $score > 15 && $score < 25 ? 2 :
- $score > 24 && $score < 35 ? 3 :
- $score > 34 && $score < 45 ? 4 : 5;
+ my $level = $score < 11 ? 1 :
+ $score > 10 && $score < 20 ? 2 :
+ $score > 19 && $score < 30 ? 3 :
+ $score > 29 && $score < 40 ? 4 : 5;
return $level;
}
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index ff4116fa6..1f52e1c7a 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- authentication:
+ o reduced password weakness check level
- allow minimal install without suggests (#45665)
- install the right kernel-XXX-devel-latest flavor instead of
hardcoding 'kernel-desktop-devel-latest'