X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=bin%2Frgit;h=19558a3d85bbf66e8e1777c748e3ab8ce205e62a;hb=1df4b5b8d8d71567094a0c6ec3702ab71b614bd9;hp=c791124c494c6d4cd275a336510b0a52d8639f68;hpb=0f55b91d632134b6077941fa223cd94378151373;p=perl%2Fmodules%2Frgit.git diff --git a/bin/rgit b/bin/rgit index c791124..19558a3 100755 --- a/bin/rgit +++ b/bin/rgit @@ -3,10 +3,9 @@ use strict; use warnings; -use Carp qw/croak/; +use Carp qw/croak/; use Config qw/%Config/; -use Cwd qw/cwd/; -use File::Spec::Functions qw/catfile path/; +use Cwd qw/cwd/; use App::Rgit; use App::Rgit::Utils qw/:levels/; @@ -44,23 +43,11 @@ if (not defined $policy) { setpgrp 0, 0 if $Config{d_setpgrp}; -my $git = $ENV{GIT_EXEC_PATH}; -unless (defined $git) { - for (path) { - my $g = catfile $_, 'git'; - if (-x $g) { - $git = $g; - last; - } - } -} -croak "Couldn't find any valid git executable" unless defined $git; - my $root = $ENV{GIT_DIR}; $root = cwd unless defined $root; my $ar = App::Rgit->new( - git => $git, + git => undef, # Autodiscovery root => $root, cmd => $cmd, args => \@ARGV, @@ -191,7 +178,7 @@ Add a remote to all repositories in "/foo/bar" to their bare counterpart in C, L, L, L, L, L and L. +The core modules L, L, L, L, L, L and L. =head1 AUTHOR @@ -201,7 +188,8 @@ You can contact me by mail or on C (vincent). =head1 BUGS -Please report any bugs or feature requests to C, or through the web interface at L. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. +Please report any bugs or feature requests to C, or through the web interface at L. +I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. =head1 SUPPORT