X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/7a727b18388a090eac9a443099fddb0a067f6e945f69f5f48b65fa39cc4e047b..2851708a5984c8ee0aa3df7d7ee73c6d092d513beec489333cb46ea0819967e7:/gitweb.perl diff --git a/gitweb.perl b/gitweb.perl index fe6c9fe..852896a 100755 --- a/gitweb.perl +++ b/gitweb.perl @@ -2814,8 +2814,12 @@ sub git_tags_body { print "\n"; } $alternate ^= 1; - print "$tag{'age'}\n" . - "" . + if (defined $tag{'age'}) { + print "$tag{'age'}\n"; + } else { + print "\n"; + } + print "" . $cgi->a({-href => href(action=>$tag{'reftype'}, hash=>$tag{'refid'}), -class => "list name"}, esc_html($tag{'name'})) . "\n" . @@ -3209,9 +3213,14 @@ HTML esc_html($rev)); print "\n"; } + open (my $dd, "-|", git_cmd(), "rev-parse", "$full_rev^") + or die_error("could not open git-rev-parse"); + my $parent_commit = <$dd>; + close $dd; + chomp($parent_commit); my $blamed = href(action => 'blame', file_name => $meta->{'filename'}, - hash_base => $full_rev); + hash_base => $parent_commit); print ""; print $cgi->a({ -href => "$blamed#l$orig_lineno", -id => "l$lineno", @@ -4424,7 +4433,7 @@ sub git_shortlog { } my $refs = git_get_references(); - my @commitlist = parse_commits($head, 101, (100 * $page)); + my @commitlist = parse_commits($hash, 101, (100 * $page)); my $paging_nav = format_paging_nav('shortlog', $hash, $head, $page, (100 * ($page+1))); my $next_link = '';