diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-09-09 00:21:03 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-09-09 00:21:03 +0000 |
| commit | 2cff3a031da1fa18db56d274b8067c45ad6ad1fc (patch) | |
| tree | 2956aa89c6f1155051a495178a6aee3b07b4df29 /perl-install | |
| parent | 6cc5131cdd288edf1a49e7951a2fd286350155cd (diff) | |
| download | drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.gz drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.bz2 drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.xz drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.zip | |
Fix regexp
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 9590b85eb..51bcd3776 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}} ? () : grep { !/lost+found/ } 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()); |