* fix for a typo in previous commit (SocketClose->CloseSocket)

git-svn-id: trunk@25202 -

packages/fcl-net/src/fpsock.pp

@@ -209,7 +209,7 @@ Const
 
 destructor TSocketStream.Destroy;
 begin
-  SocketClose(Handle);
+  CloseSocket(Handle);
   inherited Destroy;
 end;