X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Frgit.git;a=blobdiff_plain;f=lib%2FApp%2FRgit%2FRepository.pm;fp=lib%2FApp%2FRgit%2FRepository.pm;h=c340942a820487e1df2650270a1255b423e45b43;hp=ec08d4b45e316c235e5b851fbc852f9beb1ff1eb;hb=a2a9110d666dcd61af2573a7ad977cf441587d21;hpb=3ff07b59ff41754a77105973a4f1e9d6d25b2c3a diff --git a/lib/App/Rgit/Repository.pm b/lib/App/Rgit/Repository.pm index ec08d4b..c340942 100644 --- a/lib/App/Rgit/Repository.pm +++ b/lib/App/Rgit/Repository.pm @@ -3,10 +3,12 @@ package App::Rgit::Repository; use strict; use warnings; -use Cwd (); # cwd, abs_path +use Cwd (); # cwd use File::Spec (); # canonpath, catdir, splitdir, abs2rel use POSIX (); # WIFEXITED WEXITSTATUS WIFSIGNALED WTERMSIG SIGINT SIGQUIT +use App::Rgit::Utils (); # abs_path + my ($WIFEXITED, $WEXITSTATUS, $WIFSIGNALED, $WTERMSIG); BEGIN { @@ -55,7 +57,7 @@ sub new { my $dir = $args{dir}; if (defined $dir) { - $dir = Cwd::abs_path($dir); + $dir = App::Rgit::Utils::abs_path($dir); } else { $dir = Cwd::cwd; }