summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-09-09 00:21:03 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-09-09 00:21:03 +0000
commit2cff3a031da1fa18db56d274b8067c45ad6ad1fc (patch)
tree2956aa89c6f1155051a495178a6aee3b07b4df29
parent6cc5131cdd288edf1a49e7951a2fd286350155cd (diff)
downloaddrakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar
drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.gz
drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.bz2
drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.tar.xz
drakx-2cff3a031da1fa18db56d274b8067c45ad6ad1fc.zip
Fix regexp
-rw-r--r--perl-install/install_steps_interactive.pm2
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());