From d36f19e7f422518f16d306be8cdc9561388f49a6 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Fri, 6 Dec 2013 22:53:36 -0400
Subject: didn't seem to help

---
 Utility/WebApp.hs | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/Utility/WebApp.hs b/Utility/WebApp.hs
index 5ee53253f..274902c3e 100644
--- a/Utility/WebApp.hs
+++ b/Utility/WebApp.hs
@@ -39,9 +39,6 @@ import Control.Concurrent
 #ifdef __ANDROID__
 import Data.Endian
 #endif
-#ifdef mingw32_HOST_OS
-import Data.Conduit.Network (bindPort)
-#endif
 import Network.Socket (withSocketsDo)
 
 localhost :: HostName
@@ -73,11 +70,7 @@ browserProc url = proc "xdg-open" [url]
  -}
 runWebApp :: Maybe HostName -> Wai.Application -> (SockAddr -> IO ()) -> IO ()
 runWebApp h app observer = withSocketsDo $ do
-#ifndef mingw32_HOST_OS
-	sock <- getSocket h
-#else
 	sock <- bindPort (settingsPort webAppSettings) (settingsHost webAppSettings)
-#endif
 	void $ forkIO $ runSettingsSocket webAppSettings sock app
 	sockaddr <- fixSockAddr <$> getSocketName sock
 	observer sockaddr
-- 
cgit v1.2.3