X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=blobdiff_plain;f=lib%2FCPANPLUS%2FDist%2FGentoo.pm;h=79fb7b8c41e5ff23295333d5a8a5afafd987aabb;hp=be152cf2fc8c883c2d2a9394e73038b96b50f8d6;hb=4f153029fbbb747ae15a78250aef1cd3970c6994;hpb=3a050b81e76326ba8f52af389822964486487839

diff --git a/lib/CPANPLUS/Dist/Gentoo.pm b/lib/CPANPLUS/Dist/Gentoo.pm
index be152cf..79fb7b8 100644
--- a/lib/CPANPLUS/Dist/Gentoo.pm
+++ b/lib/CPANPLUS/Dist/Gentoo.pm
@@ -245,6 +245,7 @@ sub create {
 
  unless ($stat->prepared) {
   error 'Can\'t create ' . $stat->dist . ' since it was never prepared -- aborting';
+  $stat->created(0);
   return 0;
  }
 
@@ -253,6 +254,8 @@ sub create {
   return 1;
  }
 
+ $stat->created(0);
+
  $self->SUPER::create(@_);
 
  my $dir = $stat->eb_dir;
@@ -314,6 +317,7 @@ sub create {
   }
  }
 
+ $stat->created(1);
  return 1;
 }