From bc6de8f5a894ec83966654c9ae8c048830bfac04 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 2 Dec 2004 09:15:04 +0000 Subject: - any::enableShadow() -> authentication::enable_shadow() - inline authentication::crypt() --- perl-install/any.pm | 5 ----- 1 file changed, 5 deletions(-) (limited to 'perl-install/any.pm') diff --git a/perl-install/any.pm b/perl-install/any.pm index 7d362b166..29aeea8c4 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -100,11 +100,6 @@ sub add_users { } } -sub enableShadow() { - run_program::rooted($::prefix, "pwconv") or log::l("pwconv failed"); - run_program::rooted($::prefix, "grpconv") or log::l("grpconv failed"); -} - sub hdInstallPath() { my $tail = first(readlink("/tmp/image") =~ m|^(?:/tmp/)?hdimage/*(.*)|); my $head = first(readlink("/tmp/hdimage") =~ m|$::prefix(.*)|); -- cgit v1.2.1