1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/adduserdrake b/perl-install/standalone/adduserdrake
index e5c1fc611..ff024dbf7 100755
--- a/perl-install/standalone/adduserdrake
+++ b/perl-install/standalone/adduserdrake
@@ -25,7 +25,7 @@ if (my @l = grep { ! /^-/ } @ARGV) {
 }
 
 system("adduser", $_->{name}) foreach @$users;
-any::write_passwd_user('', $_, $isMD5) foreach @$users;
+any::write_passwd_user($_, $isMD5) foreach @$users;
 system("pwconv") if $isShadow;
 
 any::addUsers($users);