diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-11 05:36:40 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-11 05:36:40 +0000 |
commit | fd3b33367c59a30383bcf29fc6b0eedb2b7b964b (patch) | |
tree | 6b2a902b73c23183008a4a12dea9cd5187a5b2ec /perl-install/standalone/drakroam | |
parent | b7dba361aa049e50d9fef75ce70f172ce7bd066c (diff) | |
download | drakx-fd3b33367c59a30383bcf29fc6b0eedb2b7b964b.tar drakx-fd3b33367c59a30383bcf29fc6b0eedb2b7b964b.tar.gz drakx-fd3b33367c59a30383bcf29fc6b0eedb2b7b964b.tar.bz2 drakx-fd3b33367c59a30383bcf29fc6b0eedb2b7b964b.tar.xz drakx-fd3b33367c59a30383bcf29fc6b0eedb2b7b964b.zip |
(AddNet) help perl_checker in checking callers
Diffstat (limited to 'perl-install/standalone/drakroam')
-rwxr-xr-x | perl-install/standalone/drakroam | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index 2870f2554..b0f6ff396 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -219,11 +219,7 @@ sub UpdateAvailable() { } sub AddNet { - my $essid = shift @_; - my $mode = shift @_; - my $channel = shift @_; - my $key = shift @_; - my $dhcp = shift @_; + my ($essid, $mode, $channel, $key, $dhcp) = @_; print "Adding net $essid\n"; push @{$KnownList->{data}}, [ $essid, $mode, $channel, $key, $dhcp ]; } |