Reduce the number of Postgres transactions we start.

diff --git a/remoteglot.pl b/remoteglot.pl
index 9cbf820..35fe887 100755 (executable)
--- a/remoteglot.pl
+++ b/remoteglot.pl
@@ -901,6 +901,7 @@ sub output_json {
        if (!$historic_json_only && exists($pos_calculating->{'history'})) {
                my %score_history = ();
 
+               local $dbh->{AutoCommit} = 0;
                my $q = $dbh->prepare('SELECT * FROM scores WHERE id=?');
                my $pos = Position->start_pos('white', 'black');
                my $halfmove_num = 0;
@@ -917,6 +918,7 @@ sub output_json {
                        ($pos) = $pos->make_pretty_move($move);
                }
                $q->finish;
+               $dbh->commit;
 
                # If at any point we are missing 10 consecutive moves,
                # truncate the history there. This is so we don't get into