index 5bfd205225a65bb4909cb44c305fb6235518d52a..23aeb257b9557cb146586868084ce1b20d7e7ac8 100755 (executable)
}
print FI "\n";
- my $path = "$prefix$name";
+ my $path;
+ if ($prefix) {
+ $path = "$prefix/$name";
+ } else {
+ $path = "$name";
+ }
$files{$path} = [$next_mark++, $mode];
$commit_time = $mtime if $mtime > $commit_time;