Fix problem where tc grants always were sent to the last peer to send traffic

This commit is contained in:
Jarrod Johnson
2013-04-08 13:35:17 -04:00
parent d569677196
commit 6c6b43f60f

View File

@ -511,7 +511,7 @@ sub grant_tcrequests {
unless ($availableslots > 0) { next; } # no slots, ignore requests for now
$udpcontext->{clientfudge}+=1; #adjust forecast for being busy
$availableslots-=1;
$udpcontext->{socket}->send("resourcerequest: ok\n",$requestors->{$rkey}->{sockaddr});
$udpcontext->{socket}->send("resourcerequest: ok\n",0,$requestors->{$rkey}->{sockaddr});
delete ($requestors->{$rkey}); #we acknoweldged, assume consumer got it, they'll do retry if they failed
}
}