|
|
@ -9,10 +9,21 @@ ErlOpts = if not HaveEQC -> []; true -> |
|
|
|
[{d, 'HAVE_EQC'}] |
|
|
|
end, |
|
|
|
|
|
|
|
case lists:keyfind(erl_opts, 1, CONFIG) of |
|
|
|
Config1 = case lists:keyfind(erl_opts, 1, CONFIG) of |
|
|
|
{erl_opts, Opts} -> |
|
|
|
NewOpts = {erl_opts, Opts ++ ErlOpts}, |
|
|
|
lists:keyreplace(erl_opts, 1, CONFIG, NewOpts); |
|
|
|
false -> |
|
|
|
CONFIG ++ [{erl_opts, ErlOpts}] |
|
|
|
end, |
|
|
|
|
|
|
|
|
|
|
|
case os:cmd("rpm -q --queryformat '%{VERSION}' centos-release") of |
|
|
|
"6\n" -> |
|
|
|
{port_env, PortEnv} = lists:keyfind(port_env, 1, Config1), |
|
|
|
NewFlag = {".*", "FLTO_FLAG", ""}, |
|
|
|
NewPortEnv = lists:keyreplace("FLTO_FLAG", 2, PortEnv, NewFlag), |
|
|
|
lists:keyreplace(port_env, 1, Config1, {port_env, NewPortEnv}); |
|
|
|
_ -> |
|
|
|
Config1 |
|
|
|
end. |