Merge pull request #233 from rekahsoft/master

Fix unixFilter on Windows

1 files changed, 6 insertions, 2 deletions

diff --git a/src/Hakyll/Core/UnixFilter.hs b/src/Hakyll/Core/UnixFilter.hs
index 34b2ecb..e9a2cc1 100644
--- a/src/Hakyll/Core/UnixFilter.hs
+++ b/src/Hakyll/Core/UnixFilter.hs
@@ -19,7 +19,7 @@ import           System.Exit             (ExitCode (..))
 import           System.IO               (Handle, hClose, hFlush, hGetContents,
                                           hPutStr, hSetEncoding, localeEncoding)
 import           System.Process
-
+import           System.Info
 
 --------------------------------------------------------------------------------
 import           Hakyll.Core.Compiler
@@ -105,8 +105,12 @@ unixFilterIO :: Monoid o
              -> i
              -> IO (o, String, ExitCode)
 unixFilterIO writer reader programName args input = do
+    let pr = if os == "mingw32"
+             then shell $ unwords (programName : args)
+             else proc programName args
+
     (Just inh, Just outh, Just errh, pid) <-
-        createProcess (proc programName args)
+        createProcess pr
                 { std_in  = CreatePipe
                 , std_out = CreatePipe
                 , std_err = CreatePipe