From: Vincent Pit <vince@profvince.com>
Date: Sat, 14 Feb 2009 21:09:58 +0000 (+0100)
Subject: Replace an occurence of $self->status by $stat in _run()
X-Git-Tag: v0.07~5
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=commitdiff_plain;h=fa5334799838382278e1c11242e94f09e9518e3d

Replace an occurence of $self->status by $stat in _run()
---

diff --git a/lib/CPANPLUS/Dist/Gentoo.pm b/lib/CPANPLUS/Dist/Gentoo.pm
index 7aa5da9..d706de3 100644
--- a/lib/CPANPLUS/Dist/Gentoo.pm
+++ b/lib/CPANPLUS/Dist/Gentoo.pm
@@ -441,7 +441,7 @@ sub _run {
 
  unless ($success) {
   error "$errmsg -- aborting";
-  if (not $verbose and defined $output and $self->status->verbose) {
+  if (not $verbose and defined $output and $stat->verbose) {
    my $msg = join '', @$output;
    1 while chomp $msg;
    error $msg;