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>

diff --git a/git-annotate.perl b/git-annotate.perl
index 9df72a1662c47790a7d97309e40dc1051e5f7fcc..a7aab2566d67289f4abe57b0d91b9210f4263089 100755 (executable)
--- 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]$/ ) {