Ver a proveniência

Make less than R17 compatible

pull/1320/head
vans163 há 8 anos
ascendente
cometimento
6180ce0c64
1 ficheiros alterados com 11 adições e 7 eliminações
  1. +11
    -7
      src/rebar_agent.erl

+ 11
- 7
src/rebar_agent.erl Ver ficheiro

@ -136,13 +136,17 @@ reload_modules(Modules, true) ->
{error, ModRsns} ->
Blacklist =
(fun Error([], Acc) -> Acc;
Error([ {ModNif, on_load_not_allowed} |T], Acc) ->
reload_modules([ModNif], false),
Error(T, [ModNif|Acc]);
Error([ {ModError, _} |T], Acc) ->
Error(T, [ModError|Acc])
end)(ModRsns, []),
lists:foldr(fun({ModError, Error}, Acc) ->
case Error of
%perhaps cover other cases of failure?
on_load_not_allowed ->
reload_modules([ModError], false),
[ModError|Acc];
_ -> [ModError|Acc]
end
end,
[], ModRsns
),
reload_modules(Modules -- Blacklist, true)
end;

Carregando…
Cancelar
Guardar