From 7e8109ce421a9280640998d379c7ba748f8dd91b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 11 Aug 2004 05:16:25 +0000 Subject: (UpdateAvailable) localize variable --- perl-install/standalone/drakroam | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install') diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index e256124fe..6707bf001 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -195,6 +195,7 @@ sub UpdateAvailable() { 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