summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-11 05:36:40 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-11 05:36:40 +0000
commitfd3b33367c59a30383bcf29fc6b0eedb2b7b964b (patch)
tree6b2a902b73c23183008a4a12dea9cd5187a5b2ec /perl-install
parentb7dba361aa049e50d9fef75ce70f172ce7bd066c (diff)
downloaddrakx-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')
-rwxr-xr-xperl-install/standalone/drakroam6
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 ];
}