Now heads show up in the shortlog and the current head is marked up in the heads...

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

diff --git a/t/model_Git.t b/t/model_Git.t
index 09a4552..dc069c8 100644 (file)
--- a/t/model_Git.t
+++ b/t/model_Git.t
@@ -31,7 +31,7 @@ is( $projectList->[0]->{name}, 'bare.git', 'list_projects has correct name for "
 # Liberally borrowed from rafl's gitweb
 my $repo = 'repo1';
 
-like($m->head_hash($repo), qr/^([0-9a-fA-F]{40})$/, 'get_head_hash');
+like($m->head_hash('HEAD', $repo), qr/^([0-9a-fA-F]{40})$/, 'head_hash');
 
 {
     my @tree = $m->list_tree('3bc0634310b9c62222bb0e724c11ffdfb297b4ac', $repo);