Added head_hash method to Project, and some test cleanups.
[catagits/Gitalist.git] / t / git / repo.t
index 155827b..a46cf8e 100644 (file)
@@ -7,11 +7,11 @@ use Data::Dumper;
 
 BEGIN { use_ok 'Gitalist::Git::Repo' }
 
-my $repo = Gitalist::Git::Repo->new( repo_dir => "$Bin/../lib/repositories" );
+my $repo_dir = "$Bin/../lib/repositories";
+my $repo = Gitalist::Git::Repo->new( repo_dir => $repo_dir );
 isa_ok($repo, 'Gitalist::Git::Repo');
 
-is($repo->repo_dir, "$Bin/../lib/repositories", "repo->repo_dir is correct" );
+is($repo->repo_dir, $repo_dir, "repo->repo_dir is correct" );
 
 my $project_list = $repo->list_projects;
-warn(Dumper($project_list));
 isa_ok(@$project_list[0], 'Gitalist::Git::Project');