diff options
| author | ivan <ivan> | 2011-04-29 01:13:20 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2011-04-29 01:13:20 +0000 |
| commit | 89cd0ae97ac521827060f147528d3c99de24b38a (patch) | |
| tree | feded28cb1b61f321f6ab072d67c9da26adf841d /FS | |
| parent | 2705b64bb669ba94492a185410e8d67f6ea82edd (diff) | |
avoid deadlocks, RT#10574
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/bin/freeside-torrus-srvderive | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/FS/bin/freeside-torrus-srvderive b/FS/bin/freeside-torrus-srvderive index e8626e10d..a02d23ea0 100644 --- a/FS/bin/freeside-torrus-srvderive +++ b/FS/bin/freeside-torrus-srvderive @@ -102,8 +102,10 @@ while (1) { exit unless @serviceids; #don't try to search for empty virtual ports #nonlocking select statements; rows in this table never change - dbh->do('SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED') - if driver_name eq 'mysql'; + if ( driver_name eq 'mysql' ) { + dbh->do('SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED'); + dbh->commit or die dbh->errstr; + } my @in = (); for my $dir ('_IN', '_OUT') { |