X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/d667e484a1d035b8baf2f4dc6dbd003433fb596a5ab71b3dee8a459de865305e..57f13c04a633df6d0783aabf7fc3e49281d26f66704e143c29b08563ea942d5d:/gitweb.perl diff --git a/gitweb.perl b/gitweb.perl index ade2fe6..84a3b1a 100755 --- a/gitweb.perl +++ b/gitweb.perl @@ -2912,9 +2912,9 @@ sub git_project_index { sub git_summary { my $descr = git_get_project_description($project) || "none"; - my $head = git_get_head_hash($project); - my %co = parse_commit($head); + my %co = parse_commit("HEAD"); my %cd = parse_date($co{'committer_epoch'}, $co{'committer_tz'}); + my $head = $co{'id'}; my $owner = git_get_project_owner($project); @@ -2961,7 +2961,7 @@ sub git_summary { # we need to request one more than 16 (0..15) to check if # those 16 are all open my $fd, "-|", git_cmd(), "rev-list", "--max-count=17", - git_get_head_hash($project), "--" + $head, "--" or die_error(undef, "Open git-rev-list failed"); my @revlist = map { chomp; $_ } <$fd>; close $fd; @@ -4177,20 +4177,20 @@ sub git_search { print "