From: Matthias Kestenholz <matthias@spinlock.ch>
Date: Fri, 28 Apr 2006 08:42:28 +0000 (+0200)
Subject: annotate: fix warning about uninitialized scalar
X-Git-Tag: v1.3.2~12
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/d0ad1653662a214baddc1d1ce669a28b91a3ae76?ds=inline;hp=--cc

annotate: fix warning about uninitialized scalar

Use of uninitialized value in scalar chomp at
./git-annotate.perl line 212, <$kid> chunk 4.

Signed-off-by: Matthias Kestenholz <matthias@spinlock.ch>
---

d0ad1653662a214baddc1d1ce669a28b91a3ae76
diff --git a/git-annotate.perl b/git-annotate.perl
index 9df72a1662..a7aab2566d 100755
--- a/git-annotate.perl
+++ b/git-annotate.perl
@@ -208,6 +208,9 @@ sub find_parent_renames {
 	while (my $change = <$patch>) {
 		chomp $change;
 		my $filename = <$patch>;
+		if (!defined $filename) {
+			next;
+		}
 		chomp $filename;
 
 		if ($change =~ m/^[AMD]$/ ) {