freebsd/ports
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Do a better job of stating which port we had problems with while

Browse Source 
mapping directories to package names.
This commit is contained in:
Steve Price
2003-02-24 16:07:07 +00:00
parent 774915fa3e
commit c2e4cc1ce9
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Tools/make_index
View File

@@ -13,7 +13,7 @@ require 5.002;
# Helper function to map a directory to a pkgname.
sub by_path {
my $name = shift;
my ($name, $port) = @_;
# If a direct mapping exists, then use it.
return $by_path{$name} if (defined $by_path{$name});
@@ -28,7 +28,7 @@ sub by_path {
$name = join('/', @p);
return $by_path{$name} if (defined $by_path{$name});
print STDERR "make_index: no entry for: $name\n";
print STDERR "make_index: $port: no entry for $name\n";
return undef;
}
@@ -101,12 +101,12 @@ foreach $name (keys %index) {
my $pkg = $index{$name};
# first the build dependencies
if (@{$pkg->{bdep}}) {
my @bdep = map { by_path($_) } @{$pkg->{bdep}};
my @bdep = map { by_path($_, $name) } @{$pkg->{bdep}};
$pkg->{bdep} = \@bdep;
}
# and now the run dependencies
if (@{$pkg->{rdep}}) {
my @rdep = map { by_path($_) } @{$pkg->{rdep}};
my @rdep = map { by_path($_, $name) } @{$pkg->{rdep}};
$pkg->{rdep} = \@rdep;
}
}