* Removed unussed but unix-only variables

git-svn-id: trunk@25575 -

packages/fcl-net/src/ssockets.pp

@@ -400,7 +400,6 @@ Function TSocketServer.GetConnection : TSocketStream;
 
 var
   NewSocket : longint;
-  r,w,e : pfdset;
 
 begin
   Result:=Nil;