diff options
author | pad <pad@mandriva.com> | 1999-09-06 10:28:41 +0000 |
---|---|---|
committer | pad <pad@mandriva.com> | 1999-09-06 10:28:41 +0000 |
commit | ed415606af749ae52aef3b3fcb2f59e818e1e705 (patch) | |
tree | cfc8a3d182b9edc6f8320df443c13f8ea7bbca3a /perl-install | |
parent | e8059cec2f7399b2c5537cb11ab9b17628d2f946 (diff) | |
download | drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.gz drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.bz2 drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.tar.xz drakx-backup-do-not-use-ed415606af749ae52aef3b3fcb2f59e818e1e705.zip |
PAD don't work because my $sup = $o->{superuser}; don't create reference
the result will go in $sup but not in $o->{superuser}
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index dd12293e5..80efd4070 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -393,8 +393,8 @@ wish to access and any applicable user name and password."), #------------------------------------------------------------------------------ sub setRootPassword($) { my ($o) = @_; - $o->{superuser} ||= {}; - $o->{superuser}{password2} ||= $o->{superuser}{password} ||= ""; +# $o->{superuser} ||= {}; +# $o->{superuser}{password2} ||= $o->{superuser}{password} ||= ""; my $sup = $o->{superuser}; $o->ask_from_entries_ref(_("Set root password"), |