From: Santi_Béjar Date: Mon, 27 Mar 2006 11:26:01 +0000 (+0200) Subject: Reintroduce svn pools to solve the memory leak. X-Git-Tag: v1.3.1~7 X-Git-Url: https://git.tokkee.org/?a=commitdiff_plain;h=d598075e52634665bd25a80b085e300d338d21f5;p=git.git Reintroduce svn pools to solve the memory leak. Introduced in 4802426. Signed-off-by: Santi Béjar Signed-off-by: Junio C Hamano --- diff --git a/git-svnimport.perl b/git-svnimport.perl index 60ed7ae3e..61f559f0a 100755 --- a/git-svnimport.perl +++ b/git-svnimport.perl @@ -136,8 +136,10 @@ sub file { print "... $rev $path ...\n" if $opt_v; my (undef, $properties); + my $pool = SVN::Pool->new(); eval { (undef, $properties) - = $self->{'svn'}->get_file($path,$rev,$fh); }; + = $self->{'svn'}->get_file($path,$rev,$fh,$pool); }; + $pool->clear; if($@) { return undef if $@ =~ /Attempted to get checksum/; die $@;