Remove withSocketsDo from examples

Author: eyeinsky

Network/Socket.hs

@@ -48,7 +48,7 @@
 -- >
 -- > -- from the "network-run" package.
 -- > runTCPServer :: Maybe HostName -> ServiceName -> (Socket -> IO a) -> IO a
--- > runTCPServer mhost port server = withSocketsDo $ do
+-- > runTCPServer mhost port server = do
 -- >     addr <- resolve
 -- >     E.bracket (open addr) close loop
 -- >   where
@@ -91,7 +91,7 @@
 -- >
 -- > -- from the "network-run" package.
 -- > runTCPClient :: HostName -> ServiceName -> (Socket -> IO a) -> IO a
--- > runTCPClient host port client = withSocketsDo $ do
+-- > runTCPClient host port client = do
 -- >     addr <- resolve
 -- >     E.bracket (open addr) close client
 -- >   where