diff options
Diffstat (limited to 'tests/libposix/posix005.hs')
-rw-r--r-- | tests/libposix/posix005.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/libposix/posix005.hs b/tests/libposix/posix005.hs index 9ca569c..4365eb5 100644 --- a/tests/libposix/posix005.hs +++ b/tests/libposix/posix005.hs @@ -4,8 +4,8 @@ import System.Posix.Env main = do hSetBuffering stdout NoBuffering - term <- getEnvVar "TERM" - putStrLn term + term <- getEnv "TERM" + maybe (return ()) putStrLn term setEnvironment [("one","1"),("two","2")] getEnvironment >>= print setEnv "foo" "bar" True @@ -16,6 +16,6 @@ main = do getEnvironment >>= print unsetEnv "foo" getEnvironment >>= print - setEnvironment [] + clearEnv getEnvironment >>= print |