From 3e2e308bb47af3a997ff66ecb99336e5635792d8 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Wed, 8 Sep 2004 10:17:39 +0000 Subject: Don't suggest lost+found as a user name (bug #11298) --- perl-install/install_steps_interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 4a0cf1d76..9590b85eb 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -1201,7 +1201,7 @@ sub addUser { if !member('mandrake', map { $_->{name} } @{$o->{users}}); } if ($o->{security} >= 1 || $clicked) { - my @suggested_names = @{$o->{users}} ? () : all("$::prefix/home"); + my @suggested_names = @{$o->{users}} ? () : grep { !/lost+found/ } all("$::prefix/home"); any::ask_users($o, $o->{users}, $o->{security}, \@suggested_names); } add2hash($o, any::get_autologin()); -- cgit v1.2.1