Fix another memory leak

bobtfish · Jan 11, 2010 · 4a5f7a3 · 4a5f7a3
1 parent ce404ff
commit 4a5f7a3
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/CHANGES b/CHANGES
@@ -1,6 +1,7 @@
 Revision history for Perl module Git::PurePerl:
 
      - Add config file handling via Config::GitLike
+     - Fix a memory leak due to unweakened circular references.
 
 0.45 Mon 21st Dec 12:36:29 GMT 2009
      - Be Win32 compatible (RT#52677), patch contributed by kmx.

diff --git a/lib/Git/PurePerl/Object.pm b/lib/Git/PurePerl/Object.pm
@@ -9,7 +9,7 @@ has 'kind'    => ( is => 'ro', isa => 'ObjectKind',    required => 1 );
 has 'size'    => ( is => 'ro', isa => 'Int',           required => 1 );
 has 'content' => ( is => 'rw', isa => 'Str',           required => 1 );
 has 'sha1'    => ( is => 'ro', isa => 'Str',           required => 1 );
-has 'git'     => ( is => 'ro', isa => 'Git::PurePerl', required => 1 );
+has 'git'     => ( is => 'ro', isa => 'Git::PurePerl', required => 1, weak_ref => 1 );
 
 __PACKAGE__->meta->make_immutable;