summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-12-02 07:49:09 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2004-12-02 07:49:09 +0000
commit83d312c018a06b03d442260f723b9654f3d219b4 (patch)
tree00a3235b74c8e7efac90fea639a97dbaf5319d46 /perl-install/any.pm
parent537fe7e25454c66f3195d5384975fc3b7cc1d37e (diff)
downloaddrakx-83d312c018a06b03d442260f723b9654f3d219b4.tar
drakx-83d312c018a06b03d442260f723b9654f3d219b4.tar.gz
drakx-83d312c018a06b03d442260f723b9654f3d219b4.tar.bz2
drakx-83d312c018a06b03d442260f723b9654f3d219b4.tar.xz
drakx-83d312c018a06b03d442260f723b9654f3d219b4.zip
Move crypt() in the package it belongs to
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 0099ecf92..7d362b166 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");