This is 0.04

[perl/modules/rgit.git] / lib / App / Rgit / Command / Each.pm

diff --git a/lib/App/Rgit/Command/Each.pm b/lib/App/Rgit/Command/Each.pm
index c042b71fa5f7ae56de1acab11089388c670e7f29..3d2bcf80bb612bc4c6be069e32a7ed9df8be94a3 100644 (file)
--- a/lib/App/Rgit/Command/Each.pm
+++ b/lib/App/Rgit/Command/Each.pm
@@ -13,11 +13,11 @@ App::Rgit::Command::Each - Class for commands to execute for each repository.
 
 =head1 VERSION
 
-Version 0.03
+Version 0.04
 
 =cut
 
-our $VERSION = '0.03';
+our $VERSION = '0.04';
 
 =head1 DESCRIPTION
 
@@ -42,8 +42,8 @@ sub run {
  my $code;
  for (@{$conf->repos}) {
   $_->chdir or next;
-  $status = $_->run($conf, @{$self->args});
-  $code = $self->report($conf, $_, $status) unless defined $code;
+  ($status, my $signal) = $_->run($conf, @{$self->args});
+  $code = $self->report($conf, $_, $status, $signal) unless defined $code;
   last if $code & LAST;
   if ($code & REDO) {
    undef $code; # Don't save it, that would be very dumb