From 3219a666f448b882c7534e200295be09ae6434fd Mon Sep 17 00:00:00 2001 From: Tristan Sloughter Date: Sun, 7 Dec 2014 18:39:26 -0600 Subject: rewrite profiles --- src/rebar_dir.erl | 35 +++++++---------------------------- 1 file changed, 7 insertions(+), 28 deletions(-) (limited to 'src/rebar_dir.erl') diff --git a/src/rebar_dir.erl b/src/rebar_dir.erl index e692c65..58ce716 100644 --- a/src/rebar_dir.erl +++ b/src/rebar_dir.erl @@ -5,10 +5,6 @@ deps_dir/2, plugins_dir/1, lib_dirs/1, - profile_dir/1, - default_deps_dir/1, - default_profile_dir/1, - default_profile_deps/1, home_dir/0, global_config_dir/1, get_cwd/0, @@ -26,42 +22,25 @@ base_dir(State) -> -spec deps_dir(rebar_state:t()) -> file:filename_all(). deps_dir(State) -> - DepsDir = rebar_state:get(State, deps_dir, ?DEFAULT_DEPS_DIR), - filename:join(profile_dir(State), DepsDir). + filename:join(base_dir(State), rebar_state:get(State, deps_dir, ?DEFAULT_DEPS_DIR)). -spec deps_dir(file:filename_all(), file:filename_all()) -> file:filename_all(). deps_dir(DepsDir, App) -> filename:join(DepsDir, App). --spec default_deps_dir(rebar_state:t()) -> file:filename_all(). -default_deps_dir(State) -> - DepsDir = rebar_state:get(State, deps_dir, ?DEFAULT_DEPS_DIR), - filename:join([base_dir(State), "default", DepsDir]). - -spec plugins_dir(rebar_state:t()) -> file:filename_all(). plugins_dir(State) -> - filename:join(base_dir(State), rebar_state:get(State, plugins_dir, ?DEFAULT_PLUGINS_DIR)). + case lists:member(global, rebar_state:current_profiles(State)) of + true -> + filename:join([base_dir(State), global_config_dir(State), rebar_state:get(State, plugins_dir, ?DEFAULT_PLUGINS_DIR)]); + false -> + filename:join(base_dir(State), rebar_state:get(State, plugins_dir, ?DEFAULT_PLUGINS_DIR)) + end. -spec lib_dirs(rebar_state:t()) -> file:filename_all(). lib_dirs(State) -> rebar_state:get(State, project_app_dirs, ?DEFAULT_PROJECT_APP_DIRS). --spec default_profile_dir(rebar_state:t()) -> file:filename_all(). -default_profile_dir(State) -> - filename:join(base_dir(State), "default"). - -profile_dir(State) -> - case rebar_state:current_profile(State) of - global -> - global_config_dir(State); - Profile -> - filename:join(base_dir(State), atom_to_list(Profile)) - end. - --spec default_profile_deps(rebar_state:t()) -> file:filename_all(). -default_profile_deps(State) -> - filename:join(default_profile_dir(State), ?DEFAULT_DEPS_DIR). - home_dir() -> {ok, [[Home]]} = init:get_argument(home), Home. -- cgit v1.1