X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=bin%2Frgit;h=ca7b0f34b2bcb710e34391329a85b19335a3aea9;hb=03469a4e200c6c9cf84a10a005e3e1aca7e848c6;hp=2efd7b8ea1d129d8f566570a7ff9f951037c854f;hpb=5da16c1f7993ea81cb83c35c480344edef4f43e8;p=perl%2Fmodules%2Frgit.git diff --git a/bin/rgit b/bin/rgit index 2efd7b8..ca7b0f3 100755 --- a/bin/rgit +++ b/bin/rgit @@ -4,6 +4,7 @@ use strict; use warnings; use Carp qw/croak/; +use Config qw/%Config/; use Cwd qw/cwd/; use File::Spec::Functions qw/catfile path/; use List::Util qw/first/; @@ -44,6 +45,8 @@ BEGIN { } } +setpgrp 0, 0 if $Config{d_setpgrp}; + my $cmd = first { !/^-/ } @ARGV; $cmd = ' ' unless defined $cmd;