From ce5f6b655d5daa42abb79961aa18cf7b90db1f74 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Wed, 16 Nov 2016 18:39:11 +0100
Subject: [PATCH] Reduce the number of Postgres transactions we start.

---
 remoteglot.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/remoteglot.pl b/remoteglot.pl
index 9cbf820..35fe887 100755
--- 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
-- 
2.39.2