X-Git-Url: http://git.shiar.nl/barcat.git/blobdiff_plain/723ee2afb91020afe0bb270f91c76bef283b6643..87c290944ab32022709bdd9e72bc2733745bc2a3:/barcat

diff --git a/barcat b/barcat
index 1ffdeda..431ed40 100755
--- a/barcat
+++ b/barcat
@@ -263,10 +263,10 @@ if ($opt{markers} and $size > 0) {
 				return $func;
 			}
 			elsif ($func =~ /\A\/($float)\z/) {
-				my @range = $1;
-				#TODO log
-				for (my $next = $1; $next < $maxval; $next += $range[0]) {
-					push @range, $next;
+				my @range = my $multiple = my $next = $1;
+				while ($next < $maxval) {
+					$multiple *= 10 if $opt{log};
+					push @range, $next += $multiple;
 				}
 				return @range;
 			}