From b1c2296049edb93a5609be8994d99e2129c065af Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 30 Jun 2016 16:55:36 +0200 Subject: make it more user friendly --- perl-install/any.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install') diff --git a/perl-install/any.pm b/perl-install/any.pm index 956349364..ba854dad7 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -933,6 +933,7 @@ sub ask_user_and_root { { 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 >= 1, + { label => N("Extra Groups:"), advanced => 1, title => 1 }, map { { label => $_, val => \$groups{$_}, text => $high_security_groups{$_}, type => 'bool', advanced => 1 }; } keys %high_security_groups, -- cgit v1.2.1