From 0b671cefde50a8d50cf5df3653ea923bc904ea15 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 23 Jul 2004 12:41:19 +0000 Subject: perl_checker compliance --- perl-install/network/netconnect.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 86c802dad..c5266513e 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -1187,11 +1187,11 @@ It is not necessary on most networks."), { name => N("Manually (the interface would still be activated at boot)"), ONBOOT => 1, DIAL_ON_BOOT => 0 }); my $method = find { - $_->{ONBOOT} eq text2bool($intf->{ippp0}{ONBOOT}) and - $_->{DIAL_ON_BOOT} eq text2bool($intf->{ippp0}{DIAL_ON_BOOT}) + $_->{ONBOOT} eq text2bool($intf->{ippp0}{ONBOOT}) && + $_->{DIAL_ON_BOOT} eq text2bool($intf->{ippp0}{DIAL_ON_BOOT}) } @isdn_dial_methods; #- use net_applet by default - $isdn->{dial_method} = $method->{name} || $isdn_dial_methods[1]->{name}; + $isdn->{dial_method} = $method->{name} || $isdn_dial_methods[1]{name}; }, name => N("How do you to dial this connection ?"), data => sub { -- cgit v1.2.1