Commit 830567e3 authored by Andrey Mokhov's avatar Andrey Mokhov

Drop redundant code

See #314
parent c6efd3f6
......@@ -2,8 +2,6 @@ module Environment (setupEnvironment) where
import System.Environment
import Base
-- | The build system invokes many external builders whose behaviour is
-- influenced by the environment variables. We need to modify some of them
-- for better robustness of the build system.
......@@ -16,13 +14,3 @@ setupEnvironment = do
-- `pwd` will return the Windows path, and then modifying $PATH will fail.
-- See https://github.com/snowleopard/hadrian/issues/189 for details.
unsetEnv "PWD"
-- On Windows, some path variables start a prefix like "C:\\" which may
-- lead to failures of scripts such as autoreconf. One particular variable
-- which causes issues is ACLOCAL_PATH. At the moment we simply reset it
-- if it contains a problematic Windows path.
-- TODO: Handle Windows paths in ACLOCAL_PATH more gracefully.
aclocal <- lookupEnv "ACLOCAL_PATH"
case aclocal of
Nothing -> return ()
Just s -> when (":\\" `isPrefixOf` drop 1 s) $ unsetEnv "ACLOCAL_PATH"
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment