From 4f6a4e25f25e2a1e022790b4643cd957c1c32539 Mon Sep 17 00:00:00 2001
From: Jens Nolte <jens@nightmarestudio.de>
Date: Mon, 2 Mar 2020 00:17:17 +0100
Subject: [PATCH] Use withFdSocket instead of setCloseOnExecIfNeeded

---
 src/QBar/ControlSocket.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/QBar/ControlSocket.hs b/src/QBar/ControlSocket.hs
index dae3a79..dc5b24d 100644
--- a/src/QBar/ControlSocket.hs
+++ b/src/QBar/ControlSocket.hs
@@ -213,8 +213,7 @@ listenUnixSocket options@MainOptions{verbose} bar commandHandler = do
   socketExists <- doesFileExist socketPath
   when socketExists $ removeFile socketPath
   sock <- socket AF_UNIX Stream defaultProtocol
-  -- TODO: unsafe probably not what we want
-  setCloseOnExecIfNeeded =<< unsafeFdSocket sock
+  withFdSocket sock setCloseOnExecIfNeeded
   bind sock (SockAddrUnix socketPath)
   listen sock 5
   forever $ do
-- 
GitLab