Sfoglia il codice sorgente

Fix bug 770

pull/3/head
Tuncer Ayaz 14 anni fa
parent
commit
46b2c0612e
1 ha cambiato i file con 10 aggiunte e 2 eliminazioni
  1. +10
    -2
      src/rebar_app_utils.erl

+ 10
- 2
src/rebar_app_utils.erl Vedi File

@ -80,7 +80,7 @@ app_name(AppFile) ->
app_applications(AppFile) ->
case load_app_file(AppFile) of
{ok, _, AppInfo} ->
proplists:get_value(applications, AppInfo);
get_value(applications, AppInfo, AppFile);
{error, Reason} ->
?ABORT("Failed to extract applications from ~s: ~p\n",
[AppFile, Reason])
@ -89,7 +89,7 @@ app_applications(AppFile) ->
app_vsn(AppFile) ->
case load_app_file(AppFile) of
{ok, _, AppInfo} ->
proplists:get_value(vsn, AppInfo);
get_value(vsn, AppInfo, AppFile);
{error, Reason} ->
?ABORT("Failed to extract vsn from ~s: ~p\n",
[AppFile, Reason])
@ -116,3 +116,11 @@ load_app_file(Filename) ->
{AppName, AppData} ->
{ok, AppName, AppData}
end.
get_value(Key, AppInfo, AppFile) ->
case proplists:get_value(Key, AppInfo) of
undefined ->
?ABORT("Failed to get app value '~p' from '~s'~n", [Key, AppFile]);
Value ->
Value
end.

Caricamento…
Annulla
Salva