diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-04-10 09:15:43 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-04-10 09:15:43 +0000 |
commit | 470a6dc5125884954091c8bf8074674fdf97d091 (patch) | |
tree | d68de8b0e8de6d041b5e9e2f6454ace98319def2 /perl-install/any.pm | |
parent | 671d63a1eda74469592454b9105a1f1487763d39 (diff) | |
download | drakx-470a6dc5125884954091c8bf8074674fdf97d091.tar drakx-470a6dc5125884954091c8bf8074674fdf97d091.tar.gz drakx-470a6dc5125884954091c8bf8074674fdf97d091.tar.bz2 drakx-470a6dc5125884954091c8bf8074674fdf97d091.tar.xz drakx-470a6dc5125884954091c8bf8074674fdf97d091.zip |
(ask_user_and_root) typo fix in comment
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index d477d3def..656612f0b 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -902,7 +902,7 @@ sub ask_user_and_root { ), { label => N("Real name"), val => \$u->{realname}, alignment => 'right', focus_out => sub { $u->{name} ||= lc(Locale::gettext::iconv($u->{realname}, "utf-8", "ascii//TRANSLIT")); - $u->{name} =~ s/[^a-zA-Z0-9_-]//g; # drop any charcter that would break login program + $u->{name} =~ s/[^a-zA-Z0-9_-]//g; # drop any character that would break login program }, focus => sub { !$superuser }, }, |