diff options
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakauth | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/finish-install | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakauth b/perl-install/standalone/drakauth index 0a7a4a917..779976f52 100755 --- a/perl-install/standalone/drakauth +++ b/perl-install/standalone/drakauth @@ -29,7 +29,7 @@ $in->ask_from(N("Authentication"), authentication::kind2description(@kinds), authentication::ask_parameters($in, $net, $authentication, $kind) or goto main; eval { - authentication::set($in, $net, $authentication); + authentication::set($in, $net, $authentication) or goto main; network::network::write_network_conf($net); #- for NISDOMAIN }; if (my $err = $@) { diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install index 215756a7e..e938416b7 100755 --- a/perl-install/standalone/finish-install +++ b/perl-install/standalone/finish-install @@ -42,7 +42,7 @@ sub ask_authentication() { authentication::set_root_passwd($superuser, $authentication); eval { - authentication::set($in, $net, $authentication); + authentication::set($in, $net, $authentication) or goto &ask_authentication; network::network::write_network_conf($net); }; if (my $err = $@) { |