%% -*- mode: erlang;erlang-indent-level: 4;indent-tabs-mode: nil -*- %% ex: ft=erlang ts=4 sw=4 et Sys = proplists:get_value(sys, CONFIG), IncludeApps = [App || {app, App, _} <- Sys], [DepsDir] = proplists:get_value(lib_dirs, Sys), DepApps = lists:map(fun(AppFile) -> {ok, [{application, Name, Attrs}]} = file:consult(filename:join(DepsDir, AppFile)), Name end, filelib:wildcard("*/ebin/*.app", DepsDir)), AppendApps = DepApps -- IncludeApps, Cond = [{mod_cond, app}, {incl_cond, include}], NewSys = lists:append(Sys, [{app, App, Cond} || App <- AppendApps]), lists:keyreplace(sys, 1, CONFIG, {sys, NewSys}).