X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Frgit.git;a=blobdiff_plain;f=lib%2FApp%2FRgit%2FRepository.pm;h=dbdfe731a86970373395bbca4138676d748675cc;hp=f415a81dcf7980f1aeae345823bb325ff54415ed;hb=c3b443e68bbe06efc7c40f0f9ace3919a6d0864b;hpb=cbafb1b35c3e76d6a7cf1628c83f08e64d3f3c5c

diff --git a/lib/App/Rgit/Repository.pm b/lib/App/Rgit/Repository.pm
index f415a81..dbdfe73 100644
--- a/lib/App/Rgit/Repository.pm
+++ b/lib/App/Rgit/Repository.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Cwd qw/cwd abs_path/;
-use File::Spec::Functions qw/catdir splitdir abs2rel file_name_is_absolute/;
+use File::Spec::Functions qw/canonpath catdir splitdir abs2rel file_name_is_absolute/;
 use POSIX qw/WIFEXITED WEXITSTATUS WIFSIGNALED WTERMSIG SIGINT SIGQUIT/;
 
 BEGIN {
@@ -66,6 +66,7 @@ sub new {
    }
   }
   return unless defined $repo;
+  $repo = canonpath $repo;
   @chunks = splitdir $repo;
   $last = pop @chunks;
   if ($last eq '.git') {