Make the path to the git executable absolute in App::Rgit::Config->new

[perl/modules/rgit.git] / lib / App / Rgit / Config.pm

diff --git a/lib/App/Rgit/Config.pm b/lib/App/Rgit/Config.pm
index a784efb89dcfb627423cf84b2aa27e57e0d19815..dd6dff2af7f24ad8b2d7224255eea8878cf90bfd 100644 (file)
--- a/lib/App/Rgit/Config.pm
+++ b/lib/App/Rgit/Config.pm
@@ -58,6 +58,7 @@ sub new {
  } else {
   return unless -x $git;
  }
+ $git = abs_path $git unless file_name_is_absolute $git;
 
  my $conf = 'App::Rgit::Config::Default';
  eval "require $conf; 1" or Carp::confess("Couldn't load $conf: $@");