Adding generic get/3; still need some cleanup

This commit is contained in:
Dave Smith 2009-12-01 10:37:46 -07:00
parent b3909cc9dc
commit cf6738928d

View file

@ -27,6 +27,7 @@
-export([new/1, -export([new/1,
get_modules/2, get_modules/2,
get_list/3, get_list/3,
get/3,
set_global/2, get_global/2]). set_global/2, get_global/2]).
-include("rebar.hrl"). -include("rebar.hrl").
@ -74,6 +75,14 @@ get_list(Config, Key, Default) ->
List List
end. end.
get(Config, Key, Default) ->
case orddict:find(Key, Config#config.opts) of
error ->
Default;
{ok, Value} ->
Value
end.
set_global(Key, Value) -> set_global(Key, Value) ->
application:set_env(rebar_global, Key, Value). application:set_env(rebar_global, Key, Value).