aboutsummaryrefslogtreecommitdiff
path: root/perl/Git.pm
diff options
context:
space:
mode:
authorAbhijit Menon-Sen <ams@toroid.org>2008-08-04 10:32:47 +0530
committerJunio C Hamano <gitster@pobox.com>2008-08-04 21:51:23 -0700
commit452d36b1f33e10a9492eb2adad357108b26ea381 (patch)
treec8ed9839d97d472d42f1668d02d4bb403b9f655b /perl/Git.pm
parent108c2aaf7984081daa6aed6d3947c7c0952216c2 (diff)
downloadgit-452d36b1f33e10a9492eb2adad357108b26ea381.tar.gz
git-452d36b1f33e10a9492eb2adad357108b26ea381.tar.xz
Fix hash slice syntax error
Signed-off-by: Abhijit Menon-Sen <ams@toroid.org> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'perl/Git.pm')
-rw-r--r--perl/Git.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl/Git.pm b/perl/Git.pm
index faaa19f62..3b6707b05 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -840,8 +840,8 @@ sub _close_hash_and_insert_object {
my @vars = map { 'hash_object_' . $_ } qw(pid in out ctx);
- command_close_bidi_pipe($self->{@vars});
- delete $self->{@vars};
+ command_close_bidi_pipe(@$self{@vars});
+ delete @$self{@vars};
}
=item cat_blob ( SHA1, FILEHANDLE )
@@ -929,8 +929,8 @@ sub _close_cat_blob {
my @vars = map { 'cat_blob_' . $_ } qw(pid in out ctx);
- command_close_bidi_pipe($self->{@vars});
- delete $self->{@vars};
+ command_close_bidi_pipe(@$self{@vars});
+ delete @$self{@vars};
}
=back