From: Matthias Lederhofer <matled@gmx.net>
Date: Sun, 6 Aug 2006 17:24:47 +0000 (+0200)
Subject: gitweb: fix commitdiff_plain for root commits
X-Git-Tag: v1.4.3-rc1~274^2~3
X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=1568515d5b8350a6087c0976c841387d71075c01;p=git.git

gitweb: fix commitdiff_plain for root commits

Signed-off-by: Matthias Lederhofer <matled@gmx.net>
Signed-off-by: Junio C Hamano <junkio@cox.net>
---

diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index b8e266e0d..08de2ce77 100755
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -2193,6 +2193,13 @@ sub git_commitdiff {
 
 sub git_commitdiff_plain {
 	mkdir($git_temp, 0700);
+	my %co = git_read_commit($hash);
+	if (!%co) {
+		die_error(undef, "Unknown commit object");
+	}
+	if (!defined $hash_parent) {
+		$hash_parent = $co{'parent'} || '--root';
+	}
 	open my $fd, "-|", $GIT, "diff-tree", '-r', $hash_parent, $hash
 		or die_error(undef, "Open git-diff-tree failed");
 	my @difftree = map { chomp; $_ } <$fd>;
@@ -2214,7 +2221,6 @@ sub git_commitdiff_plain {
 	}
 
 	print $cgi->header(-type => "text/plain", -charset => 'utf-8', '-content-disposition' => "inline; filename=\"git-$hash.patch\"");
-	my %co = git_read_commit($hash);
 	my %ad = date_str($co{'author_epoch'}, $co{'author_tz'});
 	my $comment = $co{'comment'};
 	print "From: $co{'author'}\n" .