diff --git a/src/Stack/Build/Execute.hs b/src/Stack/Build/Execute.hs index 4516754d43..51bf6a808d 100644 --- a/src/Stack/Build/Execute.hs +++ b/src/Stack/Build/Execute.hs @@ -273,7 +273,7 @@ getSetupExe setupHs tmpdir = do , toFilePath tmpOutputPath ] ++ ["-build-runner" | wc == Ghcjs] - runCmd (CMD (Just tmpdir) (compilerExeName wc) menv args) Nothing + runCmd' (\cp -> cp { std_out = UseHandle stderr }) (CMD (Just tmpdir) (compilerExeName wc) menv args) Nothing when (wc == Ghcjs) $ renameDir tmpJsExePath jsExePath renameFile tmpExePath exePath return $ Just exePath