]> git.vpit.fr Git - perl/modules/CPANPLUS-Dist-Gentoo.git/commitdiff
PORTDIR_OVERLAY is supposed to be a space-delimited list
authorVincent Pit <vince@profvince.com>
Sun, 21 Dec 2008 10:56:05 +0000 (11:56 +0100)
committerVincent Pit <vince@profvince.com>
Sun, 21 Dec 2008 10:56:05 +0000 (11:56 +0100)
lib/CPANPLUS/Dist/Gentoo.pm

index bcdc7282fb46c5267aba7b4ca37c8ad18cee84e9..f2a12085e98e0ff3efdd7f26b2f0b328d77f37d2 100644 (file)
@@ -75,7 +75,7 @@ sub format_available {
      my $o = $1;
      $o =~ s/^["']*//;
      $o =~ s/["']*$//;
-     $overlays = [ map abs_path($_), grep length, split /:/, $o ];
+     $overlays = [ map abs_path($_), split ' ', $o ];
     }
     if (/^ACCEPT_KEYWORDS=(.*)$/m) {
      my $k = $1;
@@ -244,11 +244,11 @@ sub prepare {
  my $portdir_overlay;
  for (@$overlays) {
   if ($_ eq $overlay or File::Spec::Functions::abs2rel($overlay, $_) eq $cur) {
-   $portdir_overlay = join ':', @$overlays;
+   $portdir_overlay = join ' ', @$overlays;
    last;
   }
  }
- $portdir_overlay = join ':', @$overlays, $overlay
+ $portdir_overlay = join ' ', @$overlays, $overlay
                                                 unless defined $portdir_overlay;
  $stat->portdir_overlay($portdir_overlay);