From 75bfb04d5d63fe7ad91213606b1bb22ee5e7b4ff Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 17 Oct 2013 16:29:49 -0400 Subject: avoid even trying to use nice on windows --- Utility/Batch.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'Utility') 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 -- cgit v1.2.3