X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=bin%2Frgit;h=2efd7b8ea1d129d8f566570a7ff9f951037c854f;hb=af98236767735990609f068a18d3a7251f2efcab;hp=53312f8ea1c4f19f956d294df6128568663e727c;hpb=e5b5b7ba124d526f1e05c83723ee8a9a738e74e1;p=perl%2Fmodules%2Frgit.git diff --git a/bin/rgit b/bin/rgit index 53312f8..2efd7b8 100755 --- a/bin/rgit +++ b/bin/rgit @@ -16,9 +16,8 @@ our $VERSION = '0.03'; BEGIN { if (-t && eval { use Term::ReadKey; 1 }) { *policy = sub { - my ($cmd, $conf, $repo, $status) = @_; + my ($cmd, $conf, $repo, $status, $signal) = @_; return NEXT unless $status; - print STDERR "git returned $status\n"; print STDERR "[a]bort, [i]gnore, [I]gnore all, [r]etry, open [s]hell ?"; ReadMode 4; my $key = ReadKey 0; @@ -38,9 +37,8 @@ BEGIN { }; } else { *policy = sub { - my ($cmd, $conf, $repo, $status) = @_; + my ($cmd, $conf, $repo, $status, $signal) = @_; return NEXT unless $status; - print STDERR "git returned $status, aborting\n"; return LAST; }; }