From: Vincent Pit <vince@profvince.com>
Date: Tue, 7 Oct 2008 17:57:37 +0000 (+0200)
Subject: LAST has priority over REDO
X-Git-Tag: v0.04~12
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Frgit.git;a=commitdiff_plain;h=e5b5b7ba124d526f1e05c83723ee8a9a738e74e1

LAST has priority over REDO
---

diff --git a/lib/App/Rgit/Command/Each.pm b/lib/App/Rgit/Command/Each.pm
index 7996f3d..c042b71 100644
--- a/lib/App/Rgit/Command/Each.pm
+++ b/lib/App/Rgit/Command/Each.pm
@@ -44,11 +44,11 @@ sub run {
   $_->chdir or next;
   $status = $_->run($conf, @{$self->args});
   $code = $self->report($conf, $_, $status) unless defined $code;
+  last if $code & LAST;
   if ($code & REDO) {
    undef $code; # Don't save it, that would be very dumb
    redo;
   }
-  last if $code & LAST;
   undef $code unless $code & SAVE;
  }
  $conf->cwd_repo->chdir;