diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-12-02 08:27:36 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-12-02 08:27:36 +0000 |
commit | 23c42785adc0e88380c6a1ee454586f8e366e3db (patch) | |
tree | fdb97364e824a2b0c312f7b7110b887c43401589 /perl-install/any.pm | |
parent | d57bb012ffed94d2a4912d0d4a896e60a259f739 (diff) | |
download | drakx-23c42785adc0e88380c6a1ee454586f8e366e3db.tar drakx-23c42785adc0e88380c6a1ee454586f8e366e3db.tar.gz drakx-23c42785adc0e88380c6a1ee454586f8e366e3db.tar.bz2 drakx-23c42785adc0e88380c6a1ee454586f8e366e3db.tar.xz drakx-23c42785adc0e88380c6a1ee454586f8e366e3db.zip |
move crypt() where it's needed
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index a679ad0af..73152b012 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -100,10 +100,6 @@ sub add_users { } } -sub crypt { - my ($password, $md5) = @_; - crypt($password, $md5 ? '$1$' . salt(8) : salt(2)); -} sub enableShadow() { run_program::rooted($::prefix, "pwconv") or log::l("pwconv failed"); run_program::rooted($::prefix, "grpconv") or log::l("grpconv failed"); |