* [LEMONLDAP-498] Fix use of transactions in DBI config storage

parent 22d9d7ae
...@@ -4,7 +4,7 @@ use strict; ...@@ -4,7 +4,7 @@ use strict;
use DBI; use DBI;
use Lemonldap::NG::Common::Conf::Constants; #inherits use Lemonldap::NG::Common::Conf::Constants; #inherits
our $VERSION = '1.0.0'; our $VERSION = '1.2.2';
our @ISA = qw(Lemonldap::NG::Common::Conf::Constants); our @ISA = qw(Lemonldap::NG::Common::Conf::Constants);
our ( @EXPORT, %EXPORT_TAGS ); our ( @EXPORT, %EXPORT_TAGS );
...@@ -55,7 +55,7 @@ sub _dbh { ...@@ -55,7 +55,7 @@ sub _dbh {
$self->{dbiTable} ||= "lmConfig"; $self->{dbiTable} ||= "lmConfig";
return $self->{_dbh} if ( $self->{_dbh} and $self->{_dbh}->ping ); return $self->{_dbh} if ( $self->{_dbh} and $self->{_dbh}->ping );
return DBI->connect_cached( $self->{dbiChain}, $self->{dbiUser}, return DBI->connect_cached( $self->{dbiChain}, $self->{dbiUser},
$self->{dbiPassword}, { RaiseError => 1, AutoCommit => 1, } ); $self->{dbiPassword}, { RaiseError => 1, AutoCommit => 0, } );
} }
sub lock { sub lock {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment