diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakroam | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index e76399ee9..c54240ee6 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -260,7 +260,7 @@ sub UpdateStatus() { my $CurrentSignal = "-"; print "Updating\n" if $::testing; foreach (run_program::get_stdout($IWConfig, $device)) { - /ESSID:"(\S*)"/ and $CurrentNet = $1; + /ESSID:"(.*?)"/ and $CurrentNet = $1; /Mode:(\S*)\s/ and $CurrentMode = $1; /key:(\S*)\s/ and $CurrentWEP = $1; m!Quality:(\S*)/! and $CurrentSignal = $1; @@ -288,7 +288,7 @@ sub UpdateAvailable() { foreach (`$IWList scan 2>/dev/null`) { /([^ ]+)([ \t]+)Scan completed :/ and $device = $1; /([^ ]+)([ \t]+)No scan results/ and $device = $1; - /ESSID:"(\S*)"/ and $essid = $1; + /ESSID:".*?"/ and $essid = $1; /Mode:(\S*)/ and $mode = $1; m!Quality:(\S*)/! and $signal = $1; if (/key:(\S*)\s/) { |