From 33944fa4347f24ce3e0d02c5e76dbc8d5e595e7c Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Sun, 7 Jun 2015 01:17:38 +0200 Subject: Fix build --- tests/Spec.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'tests') diff --git a/tests/Spec.hs b/tests/Spec.hs index 8665c61..b1a0313 100644 --- a/tests/Spec.hs +++ b/tests/Spec.hs @@ -1,8 +1,10 @@ import Distribution.Helper -import System.Environment +import System.Environment.Extra (lookupEnv) +import System.Posix.Env (setEnv) import Data.Maybe +import Data.Functor main :: IO () main = do - setEnv "HOME" =<< fromMaybe "/tmp" <$> lookupEnv "TMPDIR" + flip (setEnv "HOME") True =<< fromMaybe "/tmp" <$> lookupEnv "TMPDIR" writeAutogenFiles "./dist" -- cgit v1.2.3