summaryrefslogtreecommitdiff
path: root/Utility/Batch.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-17 16:29:49 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-17 16:29:49 -0400
commit75bfb04d5d63fe7ad91213606b1bb22ee5e7b4ff (patch)
tree386c442414c8afc1758eda6103eb11a2cd3faff7 /Utility/Batch.hs
parent78f0be854c0d961b4d261466d1484531bf21e706 (diff)
avoid even trying to use nice on windows
Diffstat (limited to 'Utility/Batch.hs')
-rw-r--r--Utility/Batch.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Utility/Batch.hs b/Utility/Batch.hs
index 8da8a03f7..a3df1c362 100644
--- a/Utility/Batch.hs
+++ b/Utility/Batch.hs
@@ -63,6 +63,7 @@ batchCommandEnv command params environ = do
void $ waitForProcess pid
E.throwIO asyncexception
where
+#ifndef mingw32_HOST_OS
p = proc "sh"
[ "-c"
, "exec " ++ nicedcommand
@@ -71,3 +72,6 @@ batchCommandEnv command params environ = do
nicedcommand
| Build.SysConfig.nice = "nice " ++ commandline
| otherwise = commandline
+#else
+ p = proc command (toCommand paras)
+#endif