Procházet zdrojové kódy

* Remove reming usage of errno.

git-svn-id: trunk@5981 -
daniel před 18 roky
rodič
revize
e47681ab0d
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      rtl/inc/sockets.inc

+ 1 - 1
rtl/inc/sockets.inc

@@ -66,7 +66,7 @@ begin
           end;
       end;
       if r=-1 then
-        case errno of
+        case socketerror of
           EsockEBADF:
 {          EsysENOTSOCK:}   {Why is this constant not defined? (DM)}
             inoutres:=6;    {Invalid file handle.}