add a commit each time through the main loop, hopefully fixes not finding anything...

[freeside.git] / FS / bin / freeside-torrus-srvderive

diff --git a/FS/bin/freeside-torrus-srvderive b/FS/bin/freeside-torrus-srvderive
index 028e5bd..b4113b7 100644 (file)
--- a/FS/bin/freeside-torrus-srvderive
+++ b/FS/bin/freeside-torrus-srvderive
@@ -147,6 +147,7 @@ while (1) {
     warn "done with $serviceid\n" if $DEBUG;
 
   }
+  dbh->commit or die dbh->errstr;
 
   myexit() if sigterm() || sigint();
   warn "restarting main loop\n" if $DEBUG > 1;