diff options
author | Alex Riesen <raa.lkml@gmail.com> | 2007-01-22 15:58:03 +0100 |
---|---|---|
committer | Junio C Hamano <junkio@cox.net> | 2007-01-22 09:44:26 -0800 |
commit | 67e4baf82679e6362d950f6a80a9a261cf266555 (patch) | |
tree | 8e9a2d73faad7d93d5f748c4b293bd6e57f6b386 /perl/Git.pm | |
parent | bed118d6bb6dee92180469466dfa265265678dd4 (diff) | |
download | git-67e4baf82679e6362d950f6a80a9a261cf266555.tar.gz git-67e4baf82679e6362d950f6a80a9a261cf266555.tar.xz |
Cleanup uninitialized value in chomp
which happens if you use ActiveState Perl and a
pipe workaround specially for it.
Signed-off-by: Alex Riesen <raa.lkml@gmail.com>
Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'perl/Git.pm')
-rw-r--r-- | perl/Git.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Git.pm b/perl/Git.pm index 2f6b59a43..c1729bafd 100644 --- a/perl/Git.pm +++ b/perl/Git.pm @@ -275,7 +275,7 @@ sub command { } else { my @lines = <$fh>; - chomp @lines; + defined and chomp for @lines; try { _cmd_close($fh, $ctx); } catch Git::Error::Command with { |