From ddb6d26664b2466b449b8f4e9472c35166054aef Mon Sep 17 00:00:00 2001 From: Giuseppe Bilotta Date: Sat, 14 Sep 2024 16:18:31 +0200 Subject: [PATCH] Avoid extra ZWSP --- git-chart | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/git-chart b/git-chart index 09263cd..2896f55 100755 --- a/git-chart +++ b/git-chart @@ -326,7 +326,7 @@ sub unicode_chart($;$) { my $from = $keys[0]; my $to = $keys[@keys-1]; - my $data = ''; + my @data = (); while (my $key = shift @keys) { my $ncommits = $dataset->{$key}{_commits}; my $char = chr(0xa0); @@ -334,11 +334,11 @@ sub unicode_chart($;$) { my $m = ceil(8*$ncommits/$max); $char = chr(0x2580+$m); } - $data .= $char . $ZWSP; + push @data, $char; } binmode(STDOUT, ":encoding(UTF-8)"); - print "$data\n"; + print join($ZWSP, @data) . "\n"; if ($to - $from > $steps{year}) { my $left = DateTime->from_epoch(epoch=>$from); -- 2.32.0.93.g670b81a890