diff options
| -rw-r--r-- | src/Shop/Server.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Shop/Server.hs b/src/Shop/Server.hs index 21d0d65..aa60274 100644 --- a/src/Shop/Server.hs +++ b/src/Shop/Server.hs @@ -40,7 +40,7 @@ serveApp f = do Nothing -> runSettings settings (logger $ f cfg) Just s -> do sock <- socket AF_UNIX Stream 0 - bind sock $ SockAddrUnix "shop-server.sock" + bind sock $ SockAddrUnix s listen sock maxListenQueue runSettingsSocket settings sock (logger $ f cfg) close sock |