diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-10 00:51:12 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-10 00:51:12 -0400 |
| commit | 894907a7964ea051cf3a062fc53031c152b203b9 (patch) | |
| tree | e0cc75ef9bd06b4ff5dee3255f80ff1918316ba3 | |
| parent | a08ae04bcb922ed076a123ecade16d58e6f75982 (diff) | |
propellor spin
| -rw-r--r-- | Propellor/SimpleSh.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/SimpleSh.hs b/Propellor/SimpleSh.hs index 99a6fc24..7e0f19ff 100644 --- a/Propellor/SimpleSh.hs +++ b/Propellor/SimpleSh.hs @@ -27,7 +27,7 @@ simpleSh namedpipe = do createDirectoryIfMissing True dir modifyFileMode dir (removeModes otherGroupModes) s <- socket AF_UNIX Stream defaultProtocol - bind s (SockAddrUnix namedpipe) + bindSocket s (SockAddrUnix namedpipe) listen s 2 forever $ do (client, _addr) <- accept s |