From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 26 Sep 2011 13:01:13 +0000 (+0200)
Subject: fix space before semicolumn
X-Git-Url: http://git.rot13.org/?p=APKPM.git;a=commitdiff_plain;h=50a815ae91cf4d7bd387f9e560e950f36e0a0af0

fix space before semicolumn
---

diff --git a/lib/H1/ZTEDSLAM.pm b/lib/H1/ZTEDSLAM.pm
index bec1b2b..8f9e856 100644
--- a/lib/H1/ZTEDSLAM.pm
+++ b/lib/H1/ZTEDSLAM.pm
@@ -35,7 +35,7 @@ sub parse {
 	my $hash;
 	foreach my $line ( split(/[\n\r]+/, $out) ) {
 		warn "# $line\n" if $ENV{DEBUG};
-		if ( $line =~ m/^(\S+.*?)\s+:\s+(\S+.*)$/ ) {
+		if ( $line =~ m/^(\S+.*?)\s*:\s+(\S+.*)$/ ) {
 			my ($n,$v) = ($1,$2);
 			$n =~ s/\(.+\)//;
 			$hash->{$n} = $v;