Commit d0c6b463 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Fix unused variable warning with process < 1.2

parent 0c99981f
......@@ -401,7 +401,7 @@ runProcess' :: FilePath -- ^ Filename of the executable
-> Maybe Handle -- ^ Handle for @stderr@
-> Bool -- ^ Delegate Ctrl+C ?
-> IO ProcessHandle
runProcess' cmd args mb_cwd mb_env mb_stdin mb_stdout mb_stderr delegate = do
runProcess' cmd args mb_cwd mb_env mb_stdin mb_stdout mb_stderr _delegate = do
(_,_,_,ph) <-
createProcess
(proc cmd args){ Process.cwd = mb_cwd
......@@ -410,7 +410,7 @@ runProcess' cmd args mb_cwd mb_env mb_stdin mb_stdout mb_stderr delegate = do
, Process.std_out = mbToStd mb_stdout
, Process.std_err = mbToStd mb_stderr
#if MIN_VERSION_process(1,2,0)
, Process.delegate_ctlc = delegate
, Process.delegate_ctlc = _delegate
#endif
}
return ph
......
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