> > Did you set  { AutoCommit => 1 } in the connection parameters?
> 
> Yes.
> 
> Is the Class::DBI::Loader::Pg responsible for using the parameters?
> Maybe there is a chance that the { AutoCommit => 1 } is being ignored
> somewhere?

I think this was the problem. After manually patching the
class /usr/share/perl5/Class/DBI/Loader/Generic.pm, forcing the insert
of { AutoCommit => 1 } the problem was solved:

##########################################################

sub new {
    my ( $class, %args ) = @_;
    if ( $args{debug} ) {
        no strict 'refs';
        *{"$class\::debug"} = sub { 1 };
    }

   ...

    $args{options} = { AutoCommit => 1 }; # forced commit
    my $self = bless {
        _datasource =>
          [ $args{dsn}, $args{user}, $args{password}, $args{options} ],
        _namespace       => $args{namespace},
        _additional      => $additional,
        _additional_base => $additional_base,
        _left_base       => $left_base,
        _constraint      => $args{constraint} || '.*',
        _exclude         => $args{exclude},
        _relationships   => $args{relationships},
        _inflect         => $args{inflect},
        CLASSES          => {},
    }, $class;

##########################################################
-- 
Paulo Silva <[EMAIL PROTECTED]>
Eurotux Informática, S.A.

Attachment: signature.asc
Description: This is a digitally signed message part

Reply via email to