diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-07-08 05:04:23 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-07-08 05:04:23 +0000 |
| commit | c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a (patch) | |
| tree | 9de6f70d327f6cb9227b84f65740d8f09a3abf4f /perl-install/standalone | |
| parent | 5bf5886d579f214ac0c7d8d6f301c56cfb9d3651 (diff) | |
| download | drakx-c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a.tar drakx-c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a.tar.gz drakx-c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a.tar.bz2 drakx-c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a.tar.xz drakx-c5b9c52a2e49c0d109d72b87c8adda657cf5ee1a.zip | |
when adding users during install, suggest the user names found in /home
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/adduserdrake | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/adduserdrake b/perl-install/standalone/adduserdrake index 4db218671..40659017f 100755 --- a/perl-install/standalone/adduserdrake +++ b/perl-install/standalone/adduserdrake @@ -19,7 +19,7 @@ if (my @l = grep { ! /^-/ } @ARGV) { $users = [ map { { name => $_, realname => $_ } } @l ]; } else { $in = 'interactive'->vnew('su'); - any::ask_users($in, $users, $ENV{SECURE_LEVEL}); + any::ask_users($in, $users, $ENV{SECURE_LEVEL}, []); } system("adduser", $_->{name}) foreach @$users; |