diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-02-29 01:37:49 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-02-29 01:37:49 +0000 |
commit | bf53578c2cf69c4f1f152d87034e7df13b363dc8 (patch) | |
tree | bc19bc2cd70ebcd761ed09794136f7e86e728fd8 /lib/network/connection/wireless.pm | |
parent | 27b1293807d90d89d1a825cc049fdb7eb67ee24f (diff) | |
download | drakx-net-bf53578c2cf69c4f1f152d87034e7df13b363dc8.tar drakx-net-bf53578c2cf69c4f1f152d87034e7df13b363dc8.tar.gz drakx-net-bf53578c2cf69c4f1f152d87034e7df13b363dc8.tar.bz2 drakx-net-bf53578c2cf69c4f1f152d87034e7df13b363dc8.tar.xz drakx-net-bf53578c2cf69c4f1f152d87034e7df13b363dc8.zip |
s/mykey/key/; s/myvar/var/
Diffstat (limited to 'lib/network/connection/wireless.pm')
-rw-r--r-- | lib/network/connection/wireless.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/network/connection/wireless.pm b/lib/network/connection/wireless.pm index 1f7712e..b8630d5 100644 --- a/lib/network/connection/wireless.pm +++ b/lib/network/connection/wireless.pm @@ -932,25 +932,25 @@ sub wpa_supplicant_add_eap_network { my $network = { ssid => qq("$ui_input->{essid}") }; #- set the values foreach my $eap_var (keys %eap_vars) { - my $mykey = join('_', "eap", $eap_var); - if (!defined $ui_input->{$mykey}) { + my $key = join('_', "eap", $eap_var); + if (!defined $ui_input->{$key}) { #- only if it is defined and not empty $network->{$eap_var} = $default_eap_cfg->{$eap_var} if $default_eap_cfg->{$eap_var}; - } elsif ($ui_input->{$mykey} =~ /auto detect/i) { + } elsif ($ui_input->{$key} =~ /auto detect/i) { #- only if it is defined and not empty $network->{$eap_var} = $default_eap_cfg->{$eap_var} if $default_eap_cfg->{$eap_var}; } else { #- do not define if blank, the save routine will delete entry from file - next if !$ui_input->{$mykey}; - $network->{$eap_var} = $eap_vars{$eap_var} == 2 ? qq("$ui_input->{$mykey}") : $ui_input->{$mykey}; + next if !$ui_input->{$key}; + $network->{$eap_var} = $eap_vars{$eap_var} == 2 ? qq("$ui_input->{$key}") : $ui_input->{$key}; } } #- handle eapextra as final overides if (defined $ui_input->{eapextra} && $ui_input->{eapextra} ne "") { #- FIXME: should split it on what the # sign? foreach my $eap_var (split('#', $ui_input->{eapextra})) { - my ($mykey, $myval) = split('=', $eap_var, 2); - $network->{$mykey} = $myval; + my ($key, $val) = split('=', $eap_var, 2); + $network->{$key} = $val; } } $network->{mode} = to_bool($ui_input->{mode} eq 'Ad-Hoc'); |