summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-11-18 01:52:09 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-11-18 01:52:09 +0000
commit2d6f40c73b6ec610c43f7073bd2e12b0790387e2 (patch)
tree531cc78c0d37a19e67af10483cc6014ab9bb8fc8 /perl-install/install_any.pm
parent38dea3d2412ecdbe2988f58b7ce7a905aff5fb10 (diff)
downloaddrakx-2d6f40c73b6ec610c43f7073bd2e12b0790387e2.tar
drakx-2d6f40c73b6ec610c43f7073bd2e12b0790387e2.tar.gz
drakx-2d6f40c73b6ec610c43f7073bd2e12b0790387e2.tar.bz2
drakx-2d6f40c73b6ec610c43f7073bd2e12b0790387e2.tar.xz
drakx-2d6f40c73b6ec610c43f7073bd2e12b0790387e2.zip
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 2e8effdf4..9086ac435 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -260,7 +260,7 @@ sub write_ldsoconf {
}
sub setAuthentication() {
- my ($shadow, $md5, $nis, $nis_server) = @{$::o->{authentification} || {}}{qw(shadow md5 NIS NIS_server)};
+ my ($shadow, $md5, $nis, $nis_server) = @{$::o->{authentication} || {}}{qw(shadow md5 NIS NIS_server)};
my $p = $::o->{prefix};
enableMD5Shadow($p, $shadow, $md5);
enableShadow() if $shadow;
@@ -309,7 +309,7 @@ sub enableMD5Shadow($$$) {
sub crypt($) {
my ($password) = @_;
- $::o->{authentification}{md5} ?
+ $::o->{authentication}{md5} ?
c::crypt_md5($password, salt(8)) :
crypt ($password, salt(2));
}
@@ -388,7 +388,7 @@ sub g_auto_install(;$) {
my @fields = qw(mntpoint type size);
$o->{partitions} = [ map { my %l; @l{@fields} = @$_{@fields}; \%l } grep { $_->{mntpoint} } @{$::o->{fstab}} ];
- exists $::o->{$_} and $o->{$_} = $::o->{$_} foreach qw(lang autoSCSI authentification printer mouse netc timezone superuser intf keyboard mkbootdisk base users installClass partitioning isUpgrade X manualFstab); #- TODO modules bootloader
+ exists $::o->{$_} and $o->{$_} = $::o->{$_} foreach qw(lang autoSCSI authentication printer mouse netc timezone superuser intf keyboard mkbootdisk base users installClass partitioning isUpgrade X manualFstab); #- TODO modules bootloader
#- local $o->{partitioning}{clearall} = 1;