From b6872479918dc3d2cb98f6774d79771187ef1ab6 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 11 Aug 2004 15:16:54 +0000 Subject: regexp cleanup (bis) --- perl-install/standalone/drakroam | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakroam b/perl-install/standalone/drakroam index 8d6f640a0..e46de2454 100755 --- a/perl-install/standalone/drakroam +++ b/perl-install/standalone/drakroam @@ -59,9 +59,9 @@ my %available_roaming_daemons = ( my ($config) = @_; each_index { /^#/ || /^\n/ and next; #ignore comments and blank lines - if (/([^ \t]+)([ \t]+)(.*)/) { + if (/^(\S+)\s+(.*)$/) { my ($essid, $mode, $channel, $key, $dhcp); - my $command = $3; + my $command = $2; # setup new network entry $essid = $1; ($mode) = $command =~ /mode\s([^\s;]+)/; -- cgit v1.2.1