diff options
Diffstat (limited to 'Utility/WebApp.hs')
-rw-r--r-- | Utility/WebApp.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/Utility/WebApp.hs b/Utility/WebApp.hs index bafc9ac22..1306b14c3 100644 --- a/Utility/WebApp.hs +++ b/Utility/WebApp.hs @@ -87,10 +87,7 @@ getSocket h = do _ -> error "unable to bind to a local socket" where (hostname, port) = maybe (localhost, Nothing) splitHostPort h - hints = defaultHints - { addrFlags = [AI_ADDRCONFIG] - , addrSocketType = Stream - } + hints = defaultHints { addrSocketType = Stream } {- Repeated attempts because bind sometimes fails for an - unknown reason on OSX. -} go addr = go' 100 addr |