diff --git a/src/rebar3_grisp_firmware.erl b/src/rebar3_grisp_firmware.erl index b387b59..9e30d61 100644 --- a/src/rebar3_grisp_firmware.erl +++ b/src/rebar3_grisp_firmware.erl @@ -172,6 +172,13 @@ get_bundle(RState, Refresh, RelName, RelVsn, ExtraRelArgs) -> deploy_bundle(RState, Refresh, RelName, RelVsn, ExtraRelArgs) -> Args = [ + "as" + ] ++ [ + lists:join(",", [atom_to_list(P) + || P <- rebar_state:current_profiles(RState)]) + ] ++ [ + "grisp", + "deploy", "--tar", "--relname", atom_to_list(RelName), "--relvsn", RelVsn, @@ -183,7 +190,7 @@ deploy_bundle(RState, Refresh, RelName, RelVsn, ExtraRelArgs) -> [_|_] -> ["--" | ExtraRelArgs]; _ -> [] end, - case rebar3:run(["grisp", "deploy" | Args]) of + case rebar3:run(Args) of {error, _Reason} = Error -> Error; {ok, _} -> {ok, RState} end. diff --git a/src/rebar3_grisp_pack.erl b/src/rebar3_grisp_pack.erl index c259001..bdac99e 100644 --- a/src/rebar3_grisp_pack.erl +++ b/src/rebar3_grisp_pack.erl @@ -203,6 +203,13 @@ get_firmware(RState, Refresh, RelName, RelVsn, ExtraRelArgs) -> build_firmwares(RState, WithBoot, Refresh, RelName, RelVsn, ExtraRelArgs) -> Args = [ + "as" + ] ++ [ + lists:join(",", [atom_to_list(P) + || P <- rebar_state:current_profiles(RState)]) + ] ++ [ + "grisp", + "firmware", "--relname", atom_to_list(RelName), "--relvsn", RelVsn, "--force", @@ -217,7 +224,7 @@ build_firmwares(RState, WithBoot, Refresh, RelName, RelVsn, ExtraRelArgs) -> [_|_] -> ["--" | ExtraRelArgs]; _ -> [] end, - case rebar3:run(["grisp", "firmware" | Args]) of + case rebar3:run(Args) of {error, _Reason} = Error -> Error; {ok, _} -> {ok, RState} end. diff --git a/src/rebar3_grisp_util.erl b/src/rebar3_grisp_util.erl index 42e8322..18acb49 100644 --- a/src/rebar3_grisp_util.erl +++ b/src/rebar3_grisp_util.erl @@ -311,7 +311,8 @@ index_releases(Releases) -> profile_postfix(RebarState) -> AllProfiles = rebar_state:current_profiles(RebarState), - case [atom_to_binary(P) || P <- AllProfiles, P =/= default, P =/= grisp, P =/= test] of + case [atom_to_binary(P) || P <- AllProfiles, + P =/= default, P =/= grisp, P =/= test] of [] -> <<"">>; Profiles -> iolist_to_binary([".", lists:join($+, Profiles)]) end.