[freeside-commits] freeside/FS/bin freeside-torrus-srvderive, 1.38, 1.39
Ivan,,,
ivan at wavetail.420.am
Fri Apr 8 10:35:02 PDT 2011
Update of /home/cvs/cvsroot/freeside/FS/bin
In directory wavetail.420.am:/tmp/cvs-serv19969/FS/bin
Modified Files:
freeside-torrus-srvderive
Log Message:
continue attempting to handle mysql hanging on queries, RT#10574
Index: freeside-torrus-srvderive
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/bin/freeside-torrus-srvderive,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -w -d -r1.38 -r1.39
--- freeside-torrus-srvderive 8 Apr 2011 17:02:56 -0000 1.38
+++ freeside-torrus-srvderive 8 Apr 2011 17:35:00 -0000 1.39
@@ -113,8 +113,6 @@
warn $ssql if $DEBUG > 2;
my $sth = dbh->prepare($ssql) or die $DBI::errstr; #better recovery here?
- warn "executing search\n" if $DEBUG;
-
eval {
my $h = set_sig_handler( 'ALRM', sub { die "_timeout\n"; } );
alarm(10*60); #5*60); #$torrus_srvderive->last_srv_date ? 5*60 : 15*60);
@@ -134,7 +132,7 @@
die $@;
}
- warn "search executed; checking results\n" if $DEBUG;
+ warn "search finished; checking results\n" if $DEBUG;
my $prev = 0;
while ( my $row = $sth->fetchrow_arrayref ) {
More information about the freeside-commits
mailing list