annotate: fix warning about uninitialized scalar

[git.git] / git-annotate.perl

diff --git a/git-annotate.perl b/git-annotate.perl
index 9df72a1..a7aab25 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]$/ ) {