The best mistakes are those you make twice; once in perl and the other

in PHP. The astute observer will notice the web pages seem a little
faster now ...

www/dbdefs.php3.in

@@ -1166,8 +1166,11 @@ function TBHasSerialConsole($node_id) {
 #
 $maxtries = 3;
 $DBlinkid = 0;
-while ($maxtries && !$DBlinkid) {
+while ($maxtries) {
     $DBlinkid = mysql_connect();
+    if ($DBlinkid) {
+	break;
+    }
     $maxtries--;
     sleep(1);
 }