add a commit each time through the main loop, hopefully fixes not finding anything...
authorivan <ivan>
Tue, 15 Mar 2011 20:56:12 +0000 (20:56 +0000)
committerivan <ivan>
Tue, 15 Mar 2011 20:56:12 +0000 (20:56 +0000)
FS/bin/freeside-torrus-srvderive

index 028e5bd..b4113b7 100644 (file)
@@ -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;