summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 2172ce4)
raw | patch | inline | side by side (parent: 2172ce4)
author | Junio C Hamano <junkio@cox.net> | |
Wed, 4 Oct 2006 21:54:32 +0000 (14:54 -0700) | ||
committer | Junio C Hamano <junkio@cox.net> | |
Wed, 4 Oct 2006 21:55:16 +0000 (14:55 -0700) |
Luben makes a good argument against it, and I agree with him in general.
The clickable handle that appear at seemingly random places makes them
look as if they are separating groups when it is not.
This also restores the executable bit I lost by mistake.
Signed-off-by: Junio C Hamano <junkio@cox.net>
The clickable handle that appear at seemingly random places makes them
look as if they are separating groups when it is not.
This also restores the executable bit I lost by mistake.
Signed-off-by: Junio C Hamano <junkio@cox.net>
gitweb/gitweb.perl | [changed mode: 0644->0755] | patch | blob | history |
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
git_footer_html();
}
-sub git_blame_flush_chunk {
- my ($name, $revdata, $color, $rev, @line) = @_;
- my $label = substr($rev, 0, 8);
- my $line = scalar(@line);
- my $cnt = 0;
- my $pop = '';
-
- if ($revdata->{$rev} ne '') {
- $pop = ' title="' . esc_html($revdata->{$rev}) . '"';
- }
-
- for (@line) {
- my ($lineno, $data) = @$_;
- $cnt++;
- print "<tr class=\"$color\">\n";
- if ($cnt == 1) {
- print "<td class=\"sha1\"$pop";
- if ($line > 1) {
- print " rowspan=\"$line\"";
- }
- print ">";
- print $cgi->a({-href => href(action=>"commit",
- hash=>$rev,
- file_name=>$name)},
- $label);
- print "</td>\n";
- }
- print "<td class=\"linenr\">".
- "<a id=\"l$lineno\" href=\"#l$lineno\" class=\"linenr\">" .
- esc_html($lineno) . "</a></td>\n";
- print "<td class=\"pre\">" . esc_html($data) . "</td>\n";
- print "</tr>\n";
- }
-}
-
-# We can have up to N*2 lines. If it is more than N lines, split it
-# into two to avoid orphans.
-sub git_blame_flush_chunk_1 {
- my ($chunk_cap, $name, $revdata, $color, $rev, @chunk) = @_;
- if ($chunk_cap < @chunk) {
- my @first = splice(@chunk, 0, @chunk/2);
- git_blame_flush_chunk($name,
- $revdata,
- $color,
- $rev,
- @first);
- }
- git_blame_flush_chunk($name,
- $revdata,
- $color,
- $rev,
- @chunk);
-}
-
sub git_blame2 {
my $fd;
my $ftype;
- my $chunk_cap = 20;
my ($have_blame) = gitweb_check_feature('blame');
if (!$have_blame) {
<table class="blame">
<tr><th>Commit</th><th>Line</th><th>Data</th></tr>
HTML
- my @chunk = ();
- my %revdata = ();
while (<$fd>) {
/^([0-9a-fA-F]{40}).*?(\d+)\)\s{1}(\s*.*)/;
- my ($full_rev, $author, $date, $lineno, $data) =
- /^([0-9a-f]{40}).*?\s\((.*?)\s+([-\d]+ [:\d]+ [-+\d]+)\s+(\d+)\)\s(.*)/;
- if (!exists $revdata{$full_rev}) {
- $revdata{$full_rev} = "$author, $date";
- }
+ my $full_rev = $1;
+ my $rev = substr($full_rev, 0, 8);
+ my $lineno = $2;
+ my $data = $3;
+
if (!defined $last_rev) {
$last_rev = $full_rev;
} elsif ($last_rev ne $full_rev) {
- git_blame_flush_chunk_1($chunk_cap,
- $file_name,
- \%revdata,
- $rev_color[$current_color],
- $last_rev, @chunk);
- @chunk = ();
$last_rev = $full_rev;
$current_color = ++$current_color % $num_colors;
}
- elsif ($chunk_cap * 2 < @chunk) {
- # We have more than N*2 lines from the same
- # revision. Flush N lines and leave N lines
- # in @chunk to avoid orphaned lines.
- my @first = splice(@chunk, 0, $chunk_cap);
- git_blame_flush_chunk($file_name,
- \%revdata,
- $rev_color[$current_color],
- $last_rev, @first);
- }
- push @chunk, [$lineno, $data];
- }
- if (@chunk) {
- git_blame_flush_chunk_1($chunk_cap,
- $file_name,
- \%revdata,
- $rev_color[$current_color],
- $last_rev, @chunk);
+ print "<tr class=\"$rev_color[$current_color]\">\n";
+ print "<td class=\"sha1\">" .
+ $cgi->a({-href => href(action=>"commit", hash=>$full_rev, file_name=>$file_name)},
+ esc_html($rev)) . "</td>\n";
+ print "<td class=\"linenr\"><a id=\"l$lineno\" href=\"#l$lineno\" class=\"linenr\">" .
+ esc_html($lineno) . "</a></td>\n";
+ print "<td class=\"pre\">" . esc_html($data) . "</td>\n";
+ print "</tr>\n";
}
print "</table>\n";
print "</div>";