diff options
author | Tino Breddin <t@tolbrino.com> | 2019-08-30 15:19:24 +0200 |
---|---|---|
committer | Tino Breddin <t@tolbrino.com> | 2019-08-30 15:19:24 +0200 |
commit | 6d6a441370bee4aa78c1d2916e74b52a9b49d40a (patch) | |
tree | 054a887e6966dc4926373fdf84f57412405ba678 /src | |
parent | 542b93a8526873dd3bbc0440aad3e7d3093ac4d8 (diff) |
Fix case clause which used wrong element order
See http://erlang.org/doc/man/ct_hooks.html#Module:on_tc_fail-4
Diffstat (limited to 'src')
-rw-r--r-- | src/cth_retry.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/cth_retry.erl b/src/cth_retry.erl index 7056c71..b745c35 100644 --- a/src/cth_retry.erl +++ b/src/cth_retry.erl @@ -94,7 +94,7 @@ on_tc_skip(Suite, TC, {tc_auto_skip, _}, State=#state{suite=Suite, groups=Groups {end_per_group, _} -> Acc; init_per_suite -> Acc; end_per_suite -> Acc; - {_Group, Case} -> [{Suite, Groups, Case}|Acc]; + {Case, _Group} -> [{Suite, Groups, Case}|Acc]; TC -> [{Suite, Groups, TC}|Acc] end, State#state{suite=Suite, acc=NewAcc}; @@ -111,7 +111,7 @@ on_tc_skip(TC, {tc_auto_skip, _}, State=#state{suite=Suite, groups=Groups, acc=A {end_per_group, _} -> Acc; init_per_suite -> Acc; end_per_suite -> Acc; - {_Group, Case} -> [{Suite, Groups, Case}|Acc]; + {Case, _Group} -> [{Suite, Groups, Case}|Acc]; TC -> [{Suite, Groups, TC}|Acc] end, State#state{acc=NewAcc}; |