www_coderepo: start a top nav bar in summary view

[public-inbox.git] / lib / PublicInbox / WwwCoderepo.pm

diff --git a/lib/PublicInbox/WwwCoderepo.pm b/lib/PublicInbox/WwwCoderepo.pm
index fb510b2848b6fc4351dfd1d217421cf99614a7db..6c119b2829d569ac06dafb21c473c3cb592d8da4 100644 (file)
--- a/lib/PublicInbox/WwwCoderepo.pm
+++ b/lib/PublicInbox/WwwCoderepo.pm
@@ -55,8 +55,16 @@ sub summary_finish {
        # git log
        my @r = split(/\n/s, pop(@x) // '');
        my $last = pop(@r) if scalar(@r) > $ctx->{wcr}->{summary_log};
-       print $zfh '<pre><a id=log>$</a> '.
-               "git log --pretty=format:'%h %s (%cs)%d'\n";
+       print $zfh <<EOM;
+<pre>
+<a
+href='#readme'>about</a> <a
+href='#heads'>heads</a> <a
+href='#tags'>tags</a>
+
+<a
+id=log>\$</a> git log --pretty=format:'%h %s (%cs)%d'
+EOM
        for (@r) {
                my $d; # decorations
                s/^ \(([^\)]+)\)// and $d = $1;