From: Vincent Pit <vince@profvince.com>
Date: Sat, 20 Dec 2008 16:25:57 +0000 (+0100)
Subject: Initialize $stat->eb_file before testing if the ebuild already exists, as we may... 
X-Git-Tag: v0.05~13
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=commitdiff_plain;h=f90f7df97016d80e86803b1a5ec136906c5e72e9

Initialize $stat->eb_file before testing if the ebuild already exists, as we may need its value later for $stat->dist
---

diff --git a/lib/CPANPLUS/Dist/Gentoo.pm b/lib/CPANPLUS/Dist/Gentoo.pm
index 2cd8ddf..e0e6bb8 100644
--- a/lib/CPANPLUS/Dist/Gentoo.pm
+++ b/lib/CPANPLUS/Dist/Gentoo.pm
@@ -266,6 +266,8 @@ sub prepare {
 
  my $file = catfile($stat->eb_dir,
                     $stat->eb_name . '-' . $stat->eb_version . '.ebuild');
+ $stat->eb_file($file);
+
  if (-e $file) {
   my $skip = 1;
   if ($stat->force) {
@@ -285,7 +287,6 @@ sub prepare {
    return 1;
   }
  }
- $stat->eb_file($file);
 
  $self->SUPER::prepare(%opts);