diff options
author | Fred Hebert <mononcqc@ferd.ca> | 2017-10-13 11:57:43 -0400 |
---|---|---|
committer | GitHub <noreply@github.com> | 2017-10-13 11:57:43 -0400 |
commit | 0e15a4cf22b50e4df2100052a332205aeba98972 (patch) | |
tree | a3cac95897747b57f8c16dfb59406c87e868dd41 /test | |
parent | 5aba7df926d0bd60ed2beddddec51622b5740e37 (diff) | |
parent | e592573745ee5dbc337d77997aaa8ebb40b566bb (diff) |
Merge pull request #1647 from ferd/fix-unlock-state-carry
Fix unlock state carry, which broke `do` sequences with `unlock` in them.
Diffstat (limited to 'test')
-rw-r--r-- | test/rebar_unlock_SUITE.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/test/rebar_unlock_SUITE.erl b/test/rebar_unlock_SUITE.erl index 8dbdb3a..b2c0205 100644 --- a/test/rebar_unlock_SUITE.erl +++ b/test/rebar_unlock_SUITE.erl @@ -42,8 +42,10 @@ unlock(Config) -> Locks = read_locks(Config), rebar_test_utils:run_and_check(Config, [], ["unlock", "fakeapp"], {ok, []}), Locks = read_locks(Config), - rebar_test_utils:run_and_check(Config, [], ["unlock", "uuid"], {ok, []}), + {ok, State} = rebar_test_utils:run_and_check(Config, [], ["unlock", "uuid"], return), ?assertEqual(Locks -- ["uuid"], read_locks(Config)), + ?assert(false =:= lists:keyfind(<<"uuid">>, 1, rebar_state:get(State, {locks, default}))), + ?assert(false =/= lists:keyfind(<<"itc">>, 1, rebar_state:get(State, {locks, default}))), rebar_test_utils:run_and_check(Config, [], ["unlock", "gproc,itc"], {ok, []}), ?assertEqual(Locks -- ["uuid","gproc","itc"], read_locks(Config)), rebar_test_utils:run_and_check(Config, [], ["unlock", string:join(Locks,",")], {ok, []}), @@ -52,8 +54,9 @@ unlock(Config) -> unlock_all(Config) -> [_|_] = read_locks(Config), - rebar_test_utils:run_and_check(Config, [], ["unlock"], {ok, []}), + {ok, State} = rebar_test_utils:run_and_check(Config, [], ["unlock"], return), ?assertEqual({error, enoent}, read_locks(Config)), + ?assertEqual([], rebar_state:get(State, {locks, default})), ok. read_locks(Config) -> |