X-Git-Url: http://git.harvie.cz/?a=blobdiff_plain;f=c%2Fgoertzel%2Fhistogram.pl;h=0a8ccb37ba437a1a34712d4fdbd59386b82e92d5;hb=43f096b6df33a61b9649067c807d72e7aab5f6d0;hp=c27f28c6e8da08f39d757fda0a325c23ccbbc567;hpb=b16207097440cb1b73dc230cdd8e7d1739805c49;p=mirrors%2FPrograms.git

diff --git a/c/goertzel/histogram.pl b/c/goertzel/histogram.pl
index c27f28c..0a8ccb3 100755
--- a/c/goertzel/histogram.pl
+++ b/c/goertzel/histogram.pl
@@ -29,7 +29,7 @@ while(<STDIN>) {
 	my $i=0;
 	print "\033[H";
 	foreach my $i (1..$#values) {
-		print bar($values[$i],10,sprintf("%8s ",trim($header[$i])))."\n";
+		print bar($values[$i],50,sprintf("%8s ",trim($header[$i])))."\n";
 	}
 	print "Time: ".$values[0]."                   \n";
 	print "                           \n";