diff options
author | Olivier Blin <oblin@mandriva.org> | 2006-02-23 10:01:46 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2006-02-23 10:01:46 +0000 |
commit | 4f76e9c3d00ee7fc519774a4397584c0ca5fd637 (patch) | |
tree | 8b8c85d901e1a51fe3d6163ea3aa5eea629c73ed | |
parent | 4808dba37976e9f3e420ada5c6d0475ecda3851b (diff) | |
download | drakx-4f76e9c3d00ee7fc519774a4397584c0ca5fd637.tar drakx-4f76e9c3d00ee7fc519774a4397584c0ca5fd637.tar.gz drakx-4f76e9c3d00ee7fc519774a4397584c0ca5fd637.tar.bz2 drakx-4f76e9c3d00ee7fc519774a4397584c0ca5fd637.tar.xz drakx-4f76e9c3d00ee7fc519774a4397584c0ca5fd637.zip |
perl_checker compliance
-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 df96e0810..5c574ba7f 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -74,7 +74,7 @@ sub create_user { '-p', authentication::user_crypted_passwd($u, $isMD5), if_($uid, '-u', $uid), if_($gid, '-g', $gid), if_($u->{realname}, '-c', $u->{realname}), - if_($u->{home}, '-d', $u->{home}, if_($u->{rename_from} ,'-m')), + if_($u->{home}, '-d', $u->{home}, if_($u->{rename_from}, '-m')), if_($u->{shell}, '-s', $u->{shell}), ($u->{rename_from} ? ('-l', $u->{name}, , $u->{rename_from}) |