summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-08-10 15:42:15 +0000
committerOlivier Blin <oblin@mandriva.org>2004-08-10 15:42:15 +0000
commit47899be0dd8b92fed025a20a90f147e3df7b00dc (patch)
tree7478a3c6a74bf1c1bd27133a6b66b6a8ebbe4b98 /perl-install/standalone
parent09531d132120ed174204b578a7ffb7e082c47222 (diff)
downloaddrakx-47899be0dd8b92fed025a20a90f147e3df7b00dc.tar
drakx-47899be0dd8b92fed025a20a90f147e3df7b00dc.tar.gz
drakx-47899be0dd8b92fed025a20a90f147e3df7b00dc.tar.bz2
drakx-47899be0dd8b92fed025a20a90f147e3df7b00dc.tar.xz
drakx-47899be0dd8b92fed025a20a90f147e3df7b00dc.zip
perl_checker compliance
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakroam2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam
index 3d7cbaf17..ec5509a05 100755
--- a/perl-install/standalone/drakroam
+++ b/perl-install/standalone/drakroam
@@ -189,7 +189,7 @@ sub UpdateAvailable {
open(my $LIST, "$IWList scan 2>/dev/null |") or die("Can't run iwlist");
@{$AvailableList->{data}} = ();
while (<$LIST>) {
- if(/([^ ]+)([ \t]+)Scan completed :/) { $device = $1 }
+ if (/([^ ]+)([ \t]+)Scan completed :/) { $device = $1 }
elsif (/([^ ]+)([ \t]+)No scan results/) { $device = $1 }
if (/ESSID:"(\S*)"/) {
$essid = $1;