diff options
| -rw-r--r-- | perl-install/any.pm | 2 | ||||
| -rw-r--r-- | perl-install/network.pm | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index e2d27ba8e..a269393ce 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -242,7 +242,7 @@ sub setAutologin { if ($user) { local *F; open F, ">$prefix/etc/sysconfig/desktop" or die "Can't open $!"; - print F uc($desktop); + print F uc($desktop) . "\n"; close F; } setVarsInSh("$prefix/etc/sysconfig/autologin", diff --git a/perl-install/network.pm b/perl-install/network.pm index c4818e758..598949fff 100644 --- a/perl-install/network.pm +++ b/perl-install/network.pm @@ -265,6 +265,7 @@ sub configureNetwork { #- my $wait = $o->wait_message(_("Hostname"), _("Determining host name and domain...")); #- network::guessHostname($o->{prefix}, $o->{netc}, $o->{intf}); #- } + $last or return; if ($last->{BOOTPROTO} =~ /^(dhcp|bootp)$/) { my $dhcp_hostname = $netc->{HOSTNAME}; $::isInstall and $in->set_help('configureNetworkHostDHCP'); |