]> dxcluster.org Git - spider.git/commitdiff
make the fix for intermittent bulls a bit more efficient
authorminima <minima>
Thu, 13 Sep 2001 23:29:48 +0000 (23:29 +0000)
committerminima <minima>
Thu, 13 Sep 2001 23:29:48 +0000 (23:29 +0000)
perl/DXMsg.pm

index 5f9ebc32540579447a117eb4c8b2e0bc4654b8bf..8c565797d586490f0384492319aea6b870e30d8e 100644 (file)
@@ -655,7 +655,10 @@ sub queue_msg
                                next unless $ref->forward_it($call);           # check the forwarding file
                                
                                # if we are here we have a node that doesn't have this message
-                               $ref->start_msg($dxchan) if !get_busy($call)  && $dxchan->state eq 'normal';
+                               if (!get_busy($call)  && $dxchan->state eq 'normal') {
+                                       $ref->start_msg($dxchan);
+                                       last;
+                               }
                        }
                }