From 50a815ae91cf4d7bd387f9e560e950f36e0a0af0 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 26 Sep 2011 15:01:13 +0200
Subject: [PATCH] fix space before semicolumn

---
 lib/H1/ZTEDSLAM.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.20.1