diff options
author | Junio C Hamano <junkio@cox.net> | 2006-09-02 22:58:48 -0700 |
---|---|---|
committer | Junio C Hamano <junkio@cox.net> | 2006-09-02 22:58:48 -0700 |
commit | 81a71734bb73c2def1e86de88fb8de9fb6379cc5 (patch) | |
tree | 8cc0d56c795faa33ac3fcddb763aac30e1a21204 /perl/Git.pm | |
parent | 9594b326dcd6b879807fe6614f55ba50fa3d4551 (diff) | |
download | git-81a71734bb73c2def1e86de88fb8de9fb6379cc5.tar.gz git-81a71734bb73c2def1e86de88fb8de9fb6379cc5.tar.xz |
Revert "Make it possible to set up libgit directly (instead of from the environment)"
This reverts commit 0270083ded143fd49841e3d3d0cac5eb06081d2a.
Diffstat (limited to 'perl/Git.pm')
-rw-r--r-- | perl/Git.pm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/perl/Git.pm b/perl/Git.pm index 9da15e9c8..9ce9fcdd3 100644 --- a/perl/Git.pm +++ b/perl/Git.pm @@ -98,8 +98,6 @@ XSLoader::load('Git', $VERSION); } -my $instance_id = 0; - =head1 CONSTRUCTORS @@ -217,7 +215,7 @@ sub repository { delete $opts{Directory}; } - $self = { opts => \%opts, id => $instance_id++ }; + $self = { opts => \%opts }; bless $self, $class; } @@ -835,10 +833,11 @@ sub _call_gate { if (defined $self) { # XXX: We ignore the WorkingCopy! To properly support # that will require heavy changes in libgit. - # For now, when we will need to do it we could temporarily - # chdir() there and then chdir() back after the call is done. - xs__call_gate($self->{id}, $self->repo_path()); + # XXX: And we ignore everything else as well. libgit + # at least needs to be extended to let us specify + # the $GIT_DIR instead of looking it up in environment. + #xs_call_gate($self->{opts}->{Repository}); } # Having to call throw from the C code is a sure path to insanity. |