summaryrefslogtreecommitdiff
path: root/src/rebar_prv_clean.erl
diff options
context:
space:
mode:
authorFred Hebert <mononcqc@ferd.ca>2016-01-24 18:52:10 -0500
committerFred Hebert <mononcqc@ferd.ca>2016-01-24 18:52:10 -0500
commit084fd3116a9e783e061184a768fd4eec9b255582 (patch)
treefb3603c8fcd626e96789741e808fce1707ce8828 /src/rebar_prv_clean.erl
parent3b20e6380ceeb9cb32565f27a164851fe58de67d (diff)
parentaeb6a1986b448c35ba177990373554a1448ef6ce (diff)
Merge pull request #1031 from tsloughter/master
add profile option to clean task
Diffstat (limited to 'src/rebar_prv_clean.erl')
-rw-r--r--src/rebar_prv_clean.erl26
1 files changed, 15 insertions, 11 deletions
diff --git a/src/rebar_prv_clean.erl b/src/rebar_prv_clean.erl
index 7f952e3..8f31fdd 100644
--- a/src/rebar_prv_clean.erl
+++ b/src/rebar_prv_clean.erl
@@ -27,32 +27,35 @@ init(State) ->
{example, "rebar3 clean"},
{short_desc, "Remove compiled beam files from apps."},
{desc, "Remove compiled beam files from apps."},
- {opts, [{all, $a, "all", undefined, "Clean all apps include deps"}]}])),
+ {opts, [{all, $a, "all", undefined, "Clean all apps include deps"},
+ {profile, $p, "profile", string, "Clean under profile. Equivalent to `rebar3 as <profile> clean`"}]}])),
{ok, State1}.
-spec do(rebar_state:t()) -> {ok, rebar_state:t()} | {error, string()}.
do(State) ->
Providers = rebar_state:providers(State),
- {all, All} = handle_args(State),
+ {All, Profiles} = handle_args(State),
+
+ State1 = rebar_state:apply_profiles(State, [list_to_atom(X) || X <- Profiles]),
Cwd = rebar_dir:get_cwd(),
- rebar_hooks:run_all_hooks(Cwd, pre, ?PROVIDER, Providers, State),
+ rebar_hooks:run_all_hooks(Cwd, pre, ?PROVIDER, Providers, State1),
case All of
true ->
- DepsDir = rebar_dir:deps_dir(State),
+ DepsDir = rebar_dir:deps_dir(State1),
AllApps = rebar_app_discover:find_apps([filename:join(DepsDir, "*")], all),
- clean_apps(State, Providers, AllApps);
+ clean_apps(State1, Providers, AllApps);
false ->
- ProjectApps = rebar_state:project_apps(State),
- clean_apps(State, Providers, ProjectApps)
+ ProjectApps = rebar_state:project_apps(State1),
+ clean_apps(State1, Providers, ProjectApps)
end,
- clean_extras(State),
+ clean_extras(State1),
- rebar_hooks:run_all_hooks(Cwd, post, ?PROVIDER, Providers, State),
+ rebar_hooks:run_all_hooks(Cwd, post, ?PROVIDER, Providers, State1),
- {ok, State}.
+ {ok, State1}.
-spec format_error(any()) -> iolist().
format_error(Reason) ->
@@ -78,4 +81,5 @@ clean_extras(State) ->
handle_args(State) ->
{Args, _} = rebar_state:command_parsed_args(State),
All = proplists:get_value(all, Args, false),
- {all, All}.
+ Profiles = proplists:get_all_values(profile, Args),
+ {All, Profiles}.