summaryrefslogtreecommitdiffstats
path: root/perl-install/network/modem.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/modem.pm')
-rw-r--r--perl-install/network/modem.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index 0619abe58..50f43d525 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -37,8 +37,10 @@ sub ppp_configure {
# handle static/dynamic settings:
if ($modem->{auto_ip} eq N("Automatic")) {
$toreplace{$_} = '0.0.0.0' foreach qw(IPAddr SubnetMask) ;
+ } else {
+ $toreplace{$_} = $modem->{$_} foreach qw(IPAddr SubnetMask) ;
}
- $toreplace{Gateway} = '0.0.0.0' if $modem->{auto_gateway} eq N("Automatic");
+ $toreplace{Gateway} = $modem->{auto_gateway} eq N("Automatic") ? '0.0.0.0' : $modem->{Gateway};
#- build ifcfg-ppp0.