Remove extra whitespace

haskell · Feb 20, 2017 · 48c8fde · 48c8fde
1 parent c722d8b
commit 48c8fde
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/System/Process.hs b/System/Process.hs
@@ -679,7 +679,7 @@ getProcessExitCode ph@(ProcessHandle _ delegating_ctlc _) = tryLockWaitpid $ do
                 Just () -> putMVar (waitpidLock ph) ()
               between m = case m of
                 Nothing -> return Nothing
-                Just () -> do     action
+                Just () -> action
 
 -- ----------------------------------------------------------------------------
 -- terminateProcess