diff --git a/src-server/Main.hs b/src-server/Main.hs index b6d8e30..1207027 100644 --- a/src-server/Main.hs +++ b/src-server/Main.hs @@ -56,6 +56,7 @@ main = do (CatchOnce $ do close' sock removeIfExists setSocketPath + raiseSignal keyboardSignal ) Nothing Net.listen sock 1024