Commit 7d988dd4 authored by Tamar Christina's avatar Tamar Christina

Fix broken validate build.

parent 1964d869
......@@ -290,7 +290,7 @@ withSignalHandlers act = do
-- uninstall handlers if necessary
let mayUninstallHandlers = liftIO $ modifyMVar_ signalHandlersRefCount $ \case
(1,Just hdls) -> do
uninstallHandlers hdls
_ <- uninstallHandlers hdls
return (0,Nothing)
(c,oldHandlers) -> return (c-1,oldHandlers)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment