diff options
| author | Aurélien Lefebvre <alefebvre@mandriva.com> | 2009-08-17 12:44:21 +0000 |
|---|---|---|
| committer | Aurélien Lefebvre <alefebvre@mandriva.com> | 2009-08-17 12:44:21 +0000 |
| commit | 37840927cc9d8066c59cce7de5c3880c5d335310 (patch) | |
| tree | 19228fc3f18abec278d85a5fbe067da6f3ada1f3 /perl-install/any.pm | |
| parent | 112ac7048e587548f1279b2823e5f8960a30f129 (diff) | |
| download | drakx-37840927cc9d8066c59cce7de5c3880c5d335310.tar drakx-37840927cc9d8066c59cce7de5c3880c5d335310.tar.gz drakx-37840927cc9d8066c59cce7de5c3880c5d335310.tar.bz2 drakx-37840927cc9d8066c59cce7de5c3880c5d335310.tar.xz drakx-37840927cc9d8066c59cce7de5c3880c5d335310.zip | |
- added password weakness display feature in interactive
- adduserdrake
o now use password weakness display
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 472db55c7..595c2af9e 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -822,7 +822,7 @@ sub ask_user_and_root { { label => N("Login name"), val => \$u->{name}, list => \@suggested_names, alignment => 'right', not_edit => 0, validate => $validate_name }, - { label => N("Password"),val => \$u->{password}, hidden => 1, alignment => 'right', + { label => N("Password"),val => \$u->{password}, hidden => 1, alignment => 'right', weakness_check => 1, validate => sub { authentication::check_given_password($in, $u, $security > 3 ? 6 : 0) } }, { label => N("Password (again)"), val => \$u->{password2}, hidden => 1, alignment => 'right' }, { label => N("Shell"), val => \$u->{shell}, list => [ shells() ], advanced => 1 }, |