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.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index 9b970e4d6..2fd484cc3 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -49,7 +49,7 @@ sub ppp_configure {
my ($in, $modem) = @_;
$modem or return;
$in->do_pkgs->install('ppp') if !$::testing;
- $in->do_pkgs->install('kdenetwork-kppp') if !$::testing &&$in->do_pkgs->is_installed('kdebase');
+ $in->do_pkgs->install('kdenetwork-kppp') if !$::testing && $in->do_pkgs->is_installed('kdebase');
any::devfssymlinkf($modem, 'modem') if $modem->{device} ne "/dev/modem";
@@ -70,9 +70,9 @@ sub ppp_configure {
# handle static/dynamic settings:
if ($modem->{auto_ip} eq N("Automatic")) {
- $toreplace{$_} = '0.0.0.0' foreach qw(IPAddr SubnetMask) ;
+ $toreplace{$_} = '0.0.0.0' foreach qw(IPAddr SubnetMask);
} else {
- $toreplace{$_} = $modem->{$_} foreach qw(IPAddr SubnetMask) ;
+ $toreplace{$_} = $modem->{$_} foreach qw(IPAddr SubnetMask);
}
$toreplace{Gateway} = $modem->{auto_gateway} eq N("Automatic") ? '0.0.0.0' : $modem->{Gateway};