From 710313a748baf13d1749e0749ca87cf14f83b910 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Thu, 26 Sep 2013 07:08:36 +0000
Subject: [PATCH] * Removed unussed but unix-only variables

git-svn-id: trunk@25575 -
---
 packages/fcl-net/src/ssockets.pp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/packages/fcl-net/src/ssockets.pp b/packages/fcl-net/src/ssockets.pp
index e85387da50..a06db72181 100644
--- a/packages/fcl-net/src/ssockets.pp
+++ b/packages/fcl-net/src/ssockets.pp
@@ -400,7 +400,6 @@ Function TSocketServer.GetConnection : TSocketStream;
 
 var
   NewSocket : longint;
-  r,w,e : pfdset;
 
 begin
   Result:=Nil;