X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/0e83198df591c5ed5d31f53c9bcdcd16ab26d4a6..f04d9ac0ffbe96ead372b84dad0786daba7f5ed7:/lcorewsaasyncselect.pas?ds=inline diff --git a/lcorewsaasyncselect.pas b/lcorewsaasyncselect.pas index 712bd7f..b64797a 100755 --- a/lcorewsaasyncselect.pas +++ b/lcorewsaasyncselect.pas @@ -138,12 +138,12 @@ begin end else begin if (event and (FD_READ or FD_ACCEPT)) <> 0 then readtrigger := true; if (event and (FD_WRITE)) <> 0 then writetrigger := true; - + if readtrigger or writetrigger then lasio.handlefdtrigger(readtrigger,writetrigger); end; // don't reset the event manually for listen sockets to avoid unwanted // extra onsessionavailible events - if (taddrint(findtree(@fdwatches,inttostr(socket))) and FD_ACCEPT) = 0 then dowsaasyncselect(socket,0,0); // if not a listen socket reset watches + if (taddrint(findtree(@fdwatches,inttostr(socket))) and (FD_ACCEPT)) = 0 then dowsaasyncselect(socket,0,0); // if not a listen socket reset watches end; end else if (ahwnd=hwndlcore) and (aumsg=wm_dotasks) then begin //writeln('processing tasks');