summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2006-02-23 10:01:46 +0000
committerOlivier Blin <oblin@mandriva.org>2006-02-23 10:01:46 +0000
commit4f76e9c3d00ee7fc519774a4397584c0ca5fd637 (patch)
tree8b8c85d901e1a51fe3d6163ea3aa5eea629c73ed
parent4808dba37976e9f3e420ada5c6d0475ecda3851b (diff)
downloaddrakx-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.pm2
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})