From 000fe3446838902ebad4f5c972434b8ce4340eac Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 11 Aug 2004 05:17:37 +0000
Subject: (UpdateAvailable) probably better

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

(limited to 'perl-install')

diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam
index 6707bf001..9cb2641c4 100755
--- a/perl-install/standalone/drakroam
+++ b/perl-install/standalone/drakroam
@@ -190,12 +190,11 @@ sub UpdateAvailable() {
 	print("Running iwlist\n");
 	open(my $LIST, "$IWList scan 2>/dev/null |") or die("Can't run iwlist");
 	@{$AvailableList->{data}} = ();
-     my ($mode, $wep, $signal);
+     my ($mode, $wep, $signal, $essid);
      local $_;
 	while (<$LIST>) {
 		if (/([^ ]+)([ \t]+)Scan completed :/) { $device = $1 }
 		elsif (/([^ ]+)([ \t]+)No scan results/) { $device = $1 }
-          my $essid;
 		if (/ESSID:"(\S*)"/) {
 			$essid = $1;
 			print("Found $essid.\n");
-- 
cgit v1.2.1