Added head_hash method to Project, and some test cleanups.

[catagits/Gitalist.git] / t / git / util.t

diff --git a/t/git/util.t b/t/git/util.t
index 35c6fea..dcc55a1 100644 (file)
--- a/t/git/util.t
+++ b/t/git/util.t
@@ -8,14 +8,16 @@ use Data::Dumper;
 BEGIN { use_ok 'Gitalist::Git::Util' }
 
 use Path::Class;
+my $gitdir = dir("$Bin/../lib/repositories/repo1");
+
 my $proj = Gitalist::Git::Util->new(
-    gitdir => dir("$Bin/../lib/repositories/repo1"),
+    gitdir => $gitdir,
 );
 isa_ok($proj, 'Gitalist::Git::Util');
 
 like( $proj->_git, qr#/git$#, 'git binary found');
 isa_ok($proj->_gpp, 'Git::PurePerl', 'gpp instance created');
-like($proj->gitdir, qr#/repositories/repo1#, 'repository path is set');
+is($proj->gitdir, $gitdir, 'repository path is set');