From 47899be0dd8b92fed025a20a90f147e3df7b00dc Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Tue, 10 Aug 2004 15:42:15 +0000
Subject: perl_checker compliance

---
 perl-install/standalone/drakroam | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

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;
-- 
cgit v1.2.1