summaryrefslogtreecommitdiff
path: root/src/rebar_rel_utils.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/rebar_rel_utils.erl')
-rw-r--r--src/rebar_rel_utils.erl15
1 files changed, 14 insertions, 1 deletions
diff --git a/src/rebar_rel_utils.erl b/src/rebar_rel_utils.erl
index d3baf4d..0b14a28 100644
--- a/src/rebar_rel_utils.erl
+++ b/src/rebar_rel_utils.erl
@@ -80,7 +80,7 @@ get_rel_release_info(Name, Path) ->
get_rel_apps(RelFile) ->
case file:consult(RelFile) of
{ok, [{release, _, _, Apps}]} ->
- Apps;
+ make_proplist(Apps, []);
_ ->
?ABORT("Failed to parse ~s~n", [RelFile])
end.
@@ -106,3 +106,16 @@ get_previous_release_path() ->
OldVerPath ->
OldVerPath
end.
+
+%% ===================================================================
+%% Internal functions
+%% ===================================================================
+
+make_proplist([{_,_}=H|T], Acc) ->
+ make_proplist(T, [H|Acc]);
+make_proplist([H|T], Acc) ->
+ App = erlang:element(1, H),
+ Ver = erlang:element(2, H),
+ make_proplist(T, [{App,Ver}|Acc]);
+make_proplist([], Acc) ->
+ Acc.