[PATCH 05/14] gitweb: allow refs passed to git_heads_body to use a name different from the hash name
Signed-off-by: Giuseppe Bilotta <giuseppe.bilotta@gmail.com>
---
gitweb/gitweb.perl | 12 +++++++-----
1 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index 6aec28e..c46e982 100755
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -3657,16 +3657,18 @@ sub git_heads_body {
} else {
print "<tr class=\"light\">\n";
}
+ my $hname = $ref{'hname'} || $ref{'name'};
+ my $name = $ref{'name'};
$alternate ^= 1;
print "<td><i>$ref{'age'}</i></td>\n" .
($curr ? "<td class=\"current_head\">" : "<td>") .
- $cgi->a({-href => href(action=>"shortlog", hash=>$ref{'name'}),
- -class => "list name"},esc_html($ref{'name'})) .
+ $cgi->a({-href => href(action=>"shortlog", hash=>$hname),
+ -class => "list name"},esc_html($name)) .
"</td>\n" .
"<td class=\"link\">" .
- $cgi->a({-href => href(action=>"shortlog", hash=>$ref{'name'})}, "shortlog") . " | " .
- $cgi->a({-href => href(action=>"log", hash=>$ref{'name'})}, "log") . " | " .
- $cgi->a({-href => href(action=>"tree", hash=>$ref{'name'}, hash_base=>$ref{'name'})}, "tree") .
+ $cgi->a({-href => href(action=>"shortlog", hash=>$hname)}, "shortlog") . " | " .
+ $cgi->a({-href => href(action=>"log", hash=>$hname)}, "log") . " | " .
+ $cgi->a({-href => href(action=>"tree", hash=>$hname, hash_base=>$hname)}, "tree") .
"</td>\n" .
"</tr>";
}
--
1.5.2.5