summaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorAlex Riesen <raa.lkml@gmail.com>2007-01-22 15:58:03 +0100
committerJunio C Hamano <junkio@cox.net>2007-01-22 09:44:26 -0800
commit67e4baf82679e6362d950f6a80a9a261cf266555 (patch)
tree8e9a2d73faad7d93d5f748c4b293bd6e57f6b386 /perl
parentbed118d6bb6dee92180469466dfa265265678dd4 (diff)
downloadgit-67e4baf82679e6362d950f6a80a9a261cf266555.tar.gz
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')
-rw-r--r--perl/Git.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/Git.pm b/perl/Git.pm
index 2f6b59a43b..c1729bafd2 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 {