diff options
author | Dave Smith <dizzyd@dizzyd.com> | 2009-11-25 15:23:42 -0700 |
---|---|---|
committer | Dave Smith <dizzyd@dizzyd.com> | 2009-11-25 15:23:42 -0700 |
commit | b7e2088c273708bd5ce46b3c135c20f2229c7ccf (patch) | |
tree | bd6d3a9d345465d87a8e6d3a56b41067f81086ce /src/rebar_config.erl | |
download | rebar-b7e2088c273708bd5ce46b3c135c20f2229c7ccf.tar.gz |
Initial commit
Diffstat (limited to 'src/rebar_config.erl')
-rw-r--r-- | src/rebar_config.erl | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/src/rebar_config.erl b/src/rebar_config.erl new file mode 100644 index 0000000..a6ad5b2 --- /dev/null +++ b/src/rebar_config.erl @@ -0,0 +1,44 @@ +%% ------------------------------------------------------------------- +%% +%% rebar: Erlang Build Tools +%% +%% Copyright (c) 2009 Dave Smith (dizzyd@dizzyd.com) +%% +%% Permission is hereby granted, free of charge, to any person obtaining a copy +%% of this software and associated documentation files (the "Software"), to deal +%% in the Software without restriction, including without limitation the rights +%% to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +%% copies of the Software, and to permit persons to whom the Software is +%% furnished to do so, subject to the following conditions: +%% +%% The above copyright notice and this permission notice shall be included in +%% all copies or substantial portions of the Software. +%% +%% THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +%% IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +%% FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +%% AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +%% LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +%% OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN +%% THE SOFTWARE. +%% ------------------------------------------------------------------- +-module(rebar_config). + +-export([new/1, + get_modules/2]). + +-record(config, { dir, + opts }). + +new(Dir) -> + {ok, DefaultConfig} = application:get_env(rebar, default_config), + #config { dir = Dir, + opts = orddict:from_list(DefaultConfig)}. + +get_modules(Config, app) -> + case orddict:find(app_modules, Config#config.opts) of + error -> + []; + {ok, Modules} -> + Modules + end. |