]> git.vpit.fr Git - perl/modules/CPANPLUS-Dist-Gentoo.git/commitdiff
Set $stat->installed properly in install()
authorVincent Pit <vince@profvince.com>
Fri, 12 Dec 2008 20:54:40 +0000 (21:54 +0100)
committerVincent Pit <vince@profvince.com>
Fri, 12 Dec 2008 20:54:40 +0000 (21:54 +0100)
lib/CPANPLUS/Dist/Gentoo.pm

index 79fb7b8c41e5ff23295333d5a8a5afafd987aabb..b24e980db8cce91d1ccde61d5f6baf8e110a9938 100644 (file)
@@ -330,7 +330,10 @@ sub install {
  my @cmd = ('emerge', '=' . $stat->eb_name . '-' . $stat->eb_version);
  unshift @cmd, $sudo if $sudo;
 
- return $self->_run(\@cmd, 1);
+ my $success = $self->_run(\@cmd, 1);
+ $stat->installed($success);
+
+ return $success;
 }
 
 sub uninstall {