diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-30 11:08:57 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-06-30 16:26:36 +0200 |
| commit | 41611f474e8cf755f5b74fb98ef33ab8d830d081 (patch) | |
| tree | c62cce8b406b7d407ab8757adcb21c3e0876830f /perl-install/any.pm | |
| parent | 4e8b78b2803239a4e5e2bf8210fc3c97ca6225de (diff) | |
| download | drakx-41611f474e8cf755f5b74fb98ef33ab8d830d081.tar drakx-41611f474e8cf755f5b74fb98ef33ab8d830d081.tar.gz drakx-41611f474e8cf755f5b74fb98ef33ab8d830d081.tar.bz2 drakx-41611f474e8cf755f5b74fb98ef33ab8d830d081.tar.xz drakx-41611f474e8cf755f5b74fb98ef33ab8d830d081.zip | |
offer again to add user to admin group (mga#17720)
default security level is 1 those days
we should probably only keep "adm" & "wheel" (eg: rip "xgrp" & the like)
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index a9ea0d3ac..956349364 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -932,9 +932,9 @@ sub ask_user_and_root { { label => N("Shell"), val => \$u->{shell}, list => [ shells() ], advanced => 1 }, { label => N("User ID"), val => \$u->{uid}, advanced => 1, validate => sub { $validate_uid_gid->('uid') } }, { label => N("Group ID"), val => \$u->{gid}, advanced => 1, validate => sub { $validate_uid_gid->('gid') } }, - if_($security > 3, + if_($security >= 1, map { - { label => $_, val => \$groups{$_}, text => $high_security_groups{$_}, type => 'bool' }; + { label => $_, val => \$groups{$_}, text => $high_security_groups{$_}, type => 'bool', advanced => 1 }; } keys %high_security_groups, ), ], |