- my $nodepend = driver_name eq 'mysql'
- ? ''
- : 'AND 0 = ( SELECT COUNT(*) FROM queue_depend'.
- ' WHERE queue_depend.jobnum = queue.jobnum ) ';
+ my $dbh = dbh;
+ unless ( $dbh->ping ) {
+ warn "WARNING: connection to database lost, reconnecting...\n";
+ myconnect;
+ unless ( $dbh->ping ) {
+ warn "WARNING: still no connection to database, sleeping for retry...\n";
+ sleep 10;
+ next;
+ }
+ }