소스 검색

Add caching of app file

Dave Smith 15 년 전
부모
커밋
c28a16258c
1개의 변경된 파일13개의 추가작업 그리고 7개의 파일을 삭제
  1. +13
    -7
      src/rebar_app_utils.erl

+ 13
- 7
src/rebar_app_utils.erl 파일 보기

@ -85,11 +85,17 @@ app_vsn(AppFile) ->
%% ===================================================================
load_app_file(Filename) ->
case file:consult(Filename) of
{ok, [{application, AppName, AppData}]} ->
{ok, AppName, AppData};
{error, Reason} ->
{error, Reason};
Other ->
{error, {unexpected_terms, Other}}
case erlang:get({app_file, Filename}) of
undefined ->
case file:consult(Filename) of
{ok, [{application, AppName, AppData}]} ->
erlang:put({app_file, Filename}, {AppName, AppData}),
{ok, AppName, AppData};
{error, Reason} ->
{error, Reason};
Other ->
{error, {unexpected_terms, Other}}
end;
{AppName, AppData} ->
{ok, AppName, AppData}
end.

불러오는 중...
취소
저장