Cut down on the number of syncshadowdb processes we fork off.

1 files changed, 10 insertions, 1 deletions

diff --git a/globals.pl b/globals.pl
index b4d42e94d..82447389d 100644
--- a/globals.pl
+++ b/globals.pl
@@ -96,6 +96,15 @@ sub ReconnectToShadowDatabase {
     }
 }
 
+my $shadowchanges = 0;
+sub SyncAnyPendingShadowChanges {
+    if ($shadowchanges) {
+        system("./syncshadowdb &");
+        $shadowchanges = 0;
+    }
+}
+    
+
 my $dosqllog = (-e "data/sqllog") && (-w "data/sqllog");
 
 sub SqlLog {
@@ -137,7 +146,7 @@ sub SendSQL {
         if ($insertid) {
             SendSQL("SET LAST_INSERT_ID = $insertid");
         }
-        system("./syncshadowdb &");
+        $shadowchanges++;
     }
 }