diff options
author | Daniel Gröber <dxld@darkboxed.org> | 2015-06-07 01:17:38 +0200 |
---|---|---|
committer | Daniel Gröber <dxld@darkboxed.org> | 2015-06-07 01:18:17 +0200 |
commit | 33944fa4347f24ce3e0d02c5e76dbc8d5e595e7c (patch) | |
tree | 6d306dcc05d41973268bdb5b5930b562bf1cd91e /tests/Spec.hs | |
parent | 7c4eb4c8bd6f1cc30094c87af8d9e0bc7e178ff8 (diff) |
Fix build
Diffstat (limited to 'tests/Spec.hs')
-rw-r--r-- | tests/Spec.hs | 6 |
1 files changed, 4 insertions, 2 deletions
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" |