summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-12-02 08:27:36 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-12-02 08:27:36 +0000
commit23c42785adc0e88380c6a1ee454586f8e366e3db (patch)
treefdb97364e824a2b0c312f7b7110b887c43401589 /perl-install/any.pm
parentd57bb012ffed94d2a4912d0d4a896e60a259f739 (diff)
downloaddrakx-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.pm4
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");