X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=torrus%2Fperllib%2FTorrus%2FCollector%2FExtDBI.pm;h=22876c00c348b650474b2b649e2c4ccc28f87887;hb=ed85b98e2e2af07335951ee89ac89b83b029a41a;hp=7d139419124d09b8897b611b0d06fcc8c5ed036e;hpb=0fb307c305e4bc2c9c27dc25a3308beae3a4d33c;p=freeside.git diff --git a/torrus/perllib/Torrus/Collector/ExtDBI.pm b/torrus/perllib/Torrus/Collector/ExtDBI.pm index 7d1394191..22876c00c 100644 --- a/torrus/perllib/Torrus/Collector/ExtDBI.pm +++ b/torrus/perllib/Torrus/Collector/ExtDBI.pm @@ -14,7 +14,7 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. -# $Id: ExtDBI.pm,v 1.1 2010-12-27 00:03:58 ivan Exp $ +# $Id: ExtDBI.pm,v 1.3 2011-05-19 17:30:44 ivan Exp $ # Stanislav Sinyagin ## Pluggable backend module for ExternalStorage @@ -63,6 +63,12 @@ sub backendOpenSession if( defined( $dbh ) ) { + + if ( $dbh->{Driver}->{Name} =~ /mysql/i ) { + $dbh->do('SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED'); + $dbh->commit(); + } + $sth = $dbh->prepare( Torrus::SQL::SrvExport->sqlInsertStatement() ); if( not defined( $sth ) ) {