This commit is contained in:
Joey Hess 2014-10-16 15:39:19 -04:00
parent b6be403d3a
commit 431c1eafe5

View file

@ -53,7 +53,7 @@ setEnv var val False = do
r <- getEnv var r <- getEnv var
case r of case r of
Nothing -> setEnv var val True Nothing -> setEnv var val True
Just _ -> return True Just _ -> return ()
#endif #endif
unsetEnv :: String -> IO () unsetEnv :: String -> IO ()