about summary refs log tree commit homepage
path: root/lib/PublicInbox/RepoBrowseGitLog.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/RepoBrowseGitLog.pm')
-rw-r--r--lib/PublicInbox/RepoBrowseGitLog.pm10
1 files changed, 7 insertions, 3 deletions
diff --git a/lib/PublicInbox/RepoBrowseGitLog.pm b/lib/PublicInbox/RepoBrowseGitLog.pm
index 47443878..7dfa7d3f 100644
--- a/lib/PublicInbox/RepoBrowseGitLog.pm
+++ b/lib/PublicInbox/RepoBrowseGitLog.pm
@@ -6,6 +6,7 @@ use strict;
 use warnings;
 use PublicInbox::Hval qw(utf8_html);
 use base qw(PublicInbox::RepoBrowseBase);
+use PublicInbox::RepoBrowseGit qw(git_dec_links);
 
 # enable if we can speed it up..., over 100ms is unnacceptable
 my @graph; # = qw(--graph);
@@ -76,9 +77,12 @@ sub git_log_stream {
 
                 $s =~ s/\As//;
                 $s = utf8_html($s);
-
-                # TODO: handle $D (decorate)
                 $s = qq(<a\nhref="${rel}commit?id=$id">$s</a>);
+
+                if ($D =~ /\AD(.+)/) {
+                        $s .= ' ('. join(', ', git_dec_links($rel, $1)) . ')';
+                }
+
                 if (defined $b) {
                         $an =~ s/\Aa//;
                         $b =~ s/\Ab//;
@@ -95,7 +99,7 @@ sub git_log_stream {
                                 $gr =~ s/([^\n]+)\z/($1."\n") x $nl/es;
                         }
                         $b = utf8_html($b);
-                        $b = "<b>$s</b>\n- $ah @ $ai\n\n$b";
+                        $b = "$s\n- $ah @ $ai\n\n$b";
                         if (@graph) {
                                 $fh->write('<table><tr><td><pre>'. $gr .
                                         '</pre></td><td><pre>' . $b .