X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Frgit.git;a=blobdiff_plain;f=lib%2FApp%2FRgit%2FCommand.pm;h=0a29f096fb86184d3b0a952d1e0d4f805d6340ed;hp=f2f043bd05b0b65aed70e2a0607e9515a7e65268;hb=65e3405b02f27293a2f943b39d963f95d1f76192;hpb=a43b4096bf0350b564465090554317935a84e7ef

diff --git a/lib/App/Rgit/Command.pm b/lib/App/Rgit/Command.pm
index f2f043b..0a29f09 100644
--- a/lib/App/Rgit/Command.pm
+++ b/lib/App/Rgit/Command.pm
@@ -85,7 +85,7 @@ sub action {
 sub report {
  my ($self) = @_;
  my $cb = $self->policy;
- return NEXT | SAVE unless $cb;
+ return $_[3] ? LAST : NEXT unless $cb;
  my $code = $cb->(@_);
  return defined $code ? $code : NEXT;
 }