From eb178a5ba4c9432e951b6c206f8baf21257ecb28 Mon Sep 17 00:00:00 2001 From: Vladislav Shtepin Date: Fri, 3 Nov 2017 22:40:37 +0300 Subject: Fix windows build using unix-compat --- tests/CompileTest.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'tests') diff --git a/tests/CompileTest.hs b/tests/CompileTest.hs index a2187d2..0cbb044 100644 --- a/tests/CompileTest.hs +++ b/tests/CompileTest.hs @@ -1,6 +1,5 @@ {-# LANGUAGE ScopedTypeVariables #-} -import System.Posix.Env (setEnv) import System.Process import System.Exit import System.IO @@ -36,7 +35,7 @@ withinRange'CH v r = main :: IO () main = do - flip (setEnv "HOME") True =<< fromMaybe "/tmp" <$> lookupEnv "TMPDIR" + setEnv "HOME" =<< fromMaybe "/tmp" <$> lookupEnv "TMPDIR" _ <- rawSystem "cabal" ["update"] let parseVer' "HEAD" = Left HEAD -- cgit v1.2.3