troubles handling pools with perl bindings

Hello list.

I've read http://svn.haxx.se/users/archive-2006-11/0167.shtml, and read
SVN::Core man page, but I still have troubles with stale process
remaning active until the end of my main programm.

My own code is something as

sub new {
 my ($class) = @_;
 return bless {
    svn => SVN::Client->new()
    }, $class;
}

sub foo {
 my ($self) = @_;
 $self->{svn}->do_something()
}

etc...

I attempted to set local default pools in each methods, such as

sub foo {
 my ($self) = @_;
  my $pool = SVN::Pool->new_default_sub();
  $self->{svn}->do_something()
}

I also tried to explicitely set a default pool, even keeping a reference
in my object:

sub new {
 my ($class) = @_;
 return bless {
    pool => SVN::Pool->new_default,
    svn => SVN::Client->new()
    }, $class;
}

However, non of the above fixed the issue... I could still try to
explicitely pass my local $pool object to all my svn operations, but it
would defeat the purpose of a default pool. So, what am I doing wrong
there ?

-- 
Guillaume Rousse
Moyens Informatiques - INRIA Futurs
Tel: 01 69 35 69 62
---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscribe@subversion.tigris.org
For additional commands, e-mail: users-help@subversion.tigris.org