stop exporting createProcessChecked

Yay, that had an ugly comment associated with it.
This commit is contained in:
Joey Hess 2020-06-04 12:46:55 -04:00
parent 438dbe3b66
commit 20557cf0ef
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -21,7 +21,6 @@ module Utility.Process (
forceSuccessProcess',
checkSuccessProcess,
createProcessSuccess,
createProcessChecked,
createBackgroundProcess,
withHandle,
withIOHandles,
@ -125,9 +124,6 @@ forceSuccessProcess' p (ExitFailure n) = fail $
showCmd p ++ " exited " ++ show n
-- | Waits for a ProcessHandle and returns True if it exited successfully.
-- Note that using this with createProcessChecked will throw away
-- the Bool, and is only useful to ignore the exit code of a process,
-- while still waiting for it. -}
checkSuccessProcess :: ProcessHandle -> IO Bool
checkSuccessProcess pid = do
code <- waitForProcess pid