perf tests: add "bindir" prefix to git tree test results
[gitweb.git] / t / perf / aggregate.perl
index c8f4a78903086f0eb343ec82ef584b6e5ac04ccd..b951747e080012340f6469d26b333a239fbde1a5 100755 (executable)
@@ -100,6 +100,7 @@ sub format_size {
 while (scalar @ARGV) {
        my $arg = $ARGV[0];
        my $dir;
+       my $prefix = '';
        last if -f $arg or $arg eq "--";
        if (! -d $arg) {
                my $rev = Git::command_oneline(qw(rev-parse --verify), $arg);
@@ -109,10 +110,11 @@ sub format_size {
        } else {
                $dir = realpath($arg);
                $dirnames{$dir} = $dir;
+               $prefix .= 'bindir';
        }
        push @dirs, $dir;
        $dirnames{$dir} ||= $arg;
-       my $prefix = $dir;
+       $prefix .= $dir;
        $prefix =~ tr/^a-zA-Z0-9/_/c;
        $prefixes{$dir} = $prefix . '.';
        shift @ARGV;