+ my $cur = File::Spec::Functions::curdir();
+ my $portdir_overlay;
+ for (@$overlays) {
+ if ($_ eq $overlay or File::Spec::Functions::abs2rel($overlay, $_) eq $cur) {
+ $portdir_overlay = join ':', @$overlays;
+ last;
+ }
+ }
+ $portdir_overlay = join ':', @$overlays, $overlay
+ unless defined $portdir_overlay;
+ $stat->portdir_overlay($portdir_overlay);
+