On Sun, Jun 13, 2010 at 12:33:30AM +0900, Ansgar Burchardt wrote:
> I can still reproduce this problem in the latest version.
> If you run the attached script, you can see that SVN::Client opens ever
> more connections without closing them again.
This looks very similar to #520693. Note that using a pool scoped to
the loop frees the handles for every loop rather than when $ctx is
destroyed.
> #! /usr/bin/perl
>
> use strict;
> use warnings;
>
use SVN::Core;
> use SVN::Client;
>
> my $url =
> "svn://svn.debian.org/pkg-perl/trunk/libhtml-formfu-perl/debian/compat";
>
> my $ctx = new SVN::Client;
> open my $null, ">", "/dev/null" or die "Could not open /dev/null: $!";
>
> for (1..10) {
my $pool = SVN::Pool->new_default;
$ctx->cat($null, $url, 'HEAD', $pool);
> system("ls", "-l", "/proc/$$/fd");
> }
Cheers,
--
James
GPG Key: 4096R/331BA3DB 2011-12-05 James McCoy