summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-15 14:50:09 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-15 14:50:09 +0000
commite4adc2b4073e3b0006f7950096bbb755efc1d412 (patch)
treee670b74361c83f7270d934ef41125e5461e2a00c
parentfa8fcd4bd95e0c3dcdbd986e01095622c46e3a7e (diff)
downloaddrakx-e4adc2b4073e3b0006f7950096bbb755efc1d412.tar
drakx-e4adc2b4073e3b0006f7950096bbb755efc1d412.tar.gz
drakx-e4adc2b4073e3b0006f7950096bbb755efc1d412.tar.bz2
drakx-e4adc2b4073e3b0006f7950096bbb755efc1d412.tar.xz
drakx-e4adc2b4073e3b0006f7950096bbb755efc1d412.zip
perl_checker fix
-rw-r--r--perl-install/network/netconnect.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 6063db821..e2634dcbc 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -143,7 +143,7 @@ sub real_main {
%eth_intf = network::ethernet::get_eth_cards_names(@all_cards);
require list_modules;
my @wmodules = list_modules::category2modules('network/wireless');
- %eth_intf = map { $_->[0] => join(': ', $_->[0], $_->[2]) } grep { !$is_wireless ^ member($_->[1], @wmodules) } @all_cards;
+ %eth_intf = map { $_->[0] => join(': ', $_->[0], $_->[2]) } grep { int(!$is_wireless) ^ member($_->[1], @wmodules) } @all_cards;
};
my $find_lan_module = sub {