summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 3e02929)
raw | patch | inline | side by side (parent: 3e02929)
author | Kay Sievers <kay.sievers@suse.de> | |
Sun, 7 Aug 2005 18:05:32 +0000 (20:05 +0200) | ||
committer | Kay Sievers <kay.sievers@suse.de> | |
Sun, 7 Aug 2005 18:05:32 +0000 (20:05 +0200) |
gitweb.pl | patch | blob | history |
diff --git a/gitweb.pl b/gitweb.pl
index a2ec30db108f65c187f2d749a52743ef743f8d00..72b08a14f3f0f3ebb0cb0fe10bd4403bf395cdfc 100755 (executable)
--- a/gitweb.pl
+++ b/gitweb.pl
# gitweb.pl - simple web interface to track changes in git repositories
#
-# Version 025
+# Version 026
#
# (C) 2005, Kay Sievers <kay.sievers@vrfy.org>
# (C) 2005, Christian Gierke <ch@gierke.de>
print "<br/>";
git_footer_html();
} elsif ($action eq "log" || $action eq "rss") {
- open my $fd, "-|", "$gitbin/rev-tree", git_head();
- my (@revtree) = reverse sort map { chomp; $_ } <$fd>;
+ open my $fd, "-|", "$gitbin/rev-list", git_head();
+ my (@revtree) = map { chomp; $_ } <$fd>;
close $fd;
if ($action eq "log") {
}
for (my $i = 0; $i <= $#revtree; $i++) {
- my $rev = $revtree[$i];
- # '1114106118 755e3010ee10dadf42a8a80770e1b115fb038d9b:1 2af17b4854036a1c2ec6c101d93c8dd1ed80d24e:1'
- last if !($rev =~ m/^([0-9]+) ([0-9a-fA-F]+).* ([0-9a-fA-F]+)/);
- my $time = $1;
- my $commit = $2;
- my $parent = $3;
+ my $commit = $revtree[$i];
my %co = git_commit($commit);
my $age = time - $co{'committer_time'};