Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

26 lines (25 sloc) 0.742 kB
%% -*- erlang -*-
Script = fun(D,S,Vs) ->
Scr = filename:join(D, S),
case file:script(Scr, orddict:store('SCRIPT', Scr, Vs)) of
{ok, Res} -> Res;
{error,_} = Err ->
io:fwrite("Error evaluating script ~s~n", [S]),
Err
end
end.
CFG1 = case os:getenv("REBAR_DEPS") of
false -> CONFIG;
[] -> CONFIG;
Dir ->
lists:keystore(deps_dir, 1, CONFIG, {deps_dir, Dir})
end.
Priv = filename:join(filename:dirname(SCRIPT), "priv").
CFG2 = case os:getenv("GPROC_DIST") of
"true" ->
CFG1;
F when F=="false"; F==false ->
Script(Priv, "remove_deps.script",
[{'CONFIG', CFG1}, {'DEPS', [gen_leader]}])
end.
Script(Priv, "check_edown.script", [{'CONFIG', CFG2}]).
Jump to Line
Something went wrong with that request. Please try again.