From 8fbd7ec2b17cefc2ab1edbd728fddb98bcadc480 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Wed, 12 Sep 2001 17:15:36 +0000
Subject: new default connection handling

---
 perl-install/network/netconnect.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/network/netconnect.pm')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 6c11a0e22..03be12866 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -223,6 +223,7 @@ ifdown eth0
       $netc->{at_boot} = $in->ask_yesorno(_("Network Configuration Wizard"), _("Do you want to start the connection at boot?"));
     if ($netc->{internet_cnx_choice} ) {
 	write_cnx_script($netc);
+	$netcnx->{type} = $netc->{internet_cnx}{$netc->{internet_cnx_choice}}{type};
     } else {
 	unlink "$prefix/etc/sysconfig/network-scripts/net_cnx_up";
 	unlink "$prefix/etc/sysconfig/network-scripts/net_cnx_down";
@@ -397,7 +398,7 @@ PPPAuthentication=$modem->{auth}
 PPPSpecialCommand=" . ($netcnx->{type} eq 'isdn_external' ? $netcnx->{isdn_external}{special_command} : '' ) . "
 
 ADSLInterfacesList=
-ADSLModem=" .  q(# Obsolete information. Please don't use it.) . "
+ADSLModem=" .  q( # Obsolete information. Please don't use it.) . "
 ADSLType=" . ($netcnx->{type} =~ /adsl/ ? $netcnx->{type} : '') . "
 ADSLProviderDomain=$netc->{DOMAINNAME2}
 ADSLProviderDNS1=$netc->{dnsServer2}
-- 
cgit v1.2.1