X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FApp%2FRgit%2FRepository.pm;h=f859f8f06aa5e804f6bde023f9359023da92b89a;hb=e295d1865b0480223b82fe2373ba79cf5485466e;hp=f7b03d7fd799964ffecc042a330c52ec5e9b32df;hpb=3051ac76178c03ab7a6e1c1e87a2533a84a738b7;p=perl%2Fmodules%2Frgit.git

diff --git a/lib/App/Rgit/Repository.pm b/lib/App/Rgit/Repository.pm
index f7b03d7..f859f8f 100644
--- a/lib/App/Rgit/Repository.pm
+++ b/lib/App/Rgit/Repository.pm
@@ -58,8 +58,8 @@ sub new {
  } else {
   return unless -d $dir
             and -d "$dir/refs"
-            and -d "$_/objects"
-            and -e "$_/HEAD";
+            and -d "$dir/objects"
+            and -e "$dir/HEAD";
 
   my @chunks = splitdir $dir;
   my $last   = pop @chunks;
@@ -211,7 +211,7 @@ You can find documentation for this module with the perldoc command.
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2008-2009 Vincent Pit, all rights reserved.
+Copyright 2008,2009,2010 Vincent Pit, all rights reserved.
 
 This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.