diff options
Diffstat (limited to 'tests')
| -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" |