diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Network.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Network.hs b/src/Network.hs index d64124e..f857ef9 100644 --- a/src/Network.hs +++ b/src/Network.hs @@ -250,7 +250,7 @@ startServer opt origHead logd' services = do putMVar ssocket sock setSocketOption sock ReuseAddr 1 setSocketOption sock Broadcast 1 - setCloseOnExecIfNeeded =<< fdSocket sock + withFdSocket sock setCloseOnExecIfNeeded bind sock (addrAddress addr) return sock |